home *** CD-ROM | disk | FTP | other *** search
/ APDL Eductation Resources / APDL Eductation Resources.iso / programs / network / machines / !Machines / !RunImage < prev    next >
Unknown  |  1991-06-05  |  25.2 KB

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text

This file was not able to be converted.
This format is not currently supported by dexvert.

ConfidenceProgramDetectionMatch TypeSupport
100% file data default
100% xdgMime image/x-tga default



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 11 f4 20 3e 20 | 21 52 75 6e 49 6d 61 67 |..... > |!RunImag|
|00000010| 65 0d 00 14 2f f4 20 43 | 6f 64 65 20 74 68 61 74 |e.../. C|ode that|
|00000020| 20 66 6f 72 6d 73 20 74 | 68 65 20 62 61 73 65 20 | forms t|he base |
|00000030| 6f 66 20 52 49 53 43 20 | 4f 53 20 61 70 70 73 2e |of RISC |OS apps.|
|00000040| 0d 00 1e 05 f4 0d 00 28 | 05 f4 0d 00 32 10 f4 20 |.......(|....2.. |
|00000050| 20 21 4d 61 63 68 69 6e | 65 73 0d 00 3c 04 0d 00 | !Machin|es..<...|
|00000060| 46 18 f4 20 28 43 29 20 | 41 6c 61 6e 20 57 69 6c |F.. (C) |Alan Wil|
|00000070| 6c 69 61 6d 73 2e 0d 00 | 50 20 f4 20 53 74 61 72 |liams...|P . Star|
|00000080| 74 65 64 20 31 34 74 68 | 20 4f 63 74 6f 62 65 72 |ted 14th| October|
|00000090| 20 31 39 39 30 2e 0d 00 | 5a 20 f4 20 56 65 72 73 | 1990...|Z . Vers|
|000000a0| 69 6f 6e 20 32 20 73 74 | 61 72 74 65 64 20 31 2f |ion 2 st|arted 1/|
|000000b0| 31 2f 31 39 39 30 0d 00 | 64 46 f4 20 56 65 72 73 |1/1990..|dF. Vers|
|000000c0| 69 6f 6e 20 74 77 6f 20 | 75 73 65 73 20 61 20 64 |ion two |uses a d|
|000000d0| 79 6e 61 6d 69 63 20 64 | 61 74 61 20 61 72 65 61 |ynamic d|ata area|
|000000e0| 20 61 66 74 65 72 20 48 | 49 4d 45 4d 2c 20 74 6f | after H|IMEM, to|
|000000f0| 20 77 68 69 63 68 20 65 | 78 74 72 61 0d 00 6e 3f | which e|xtra..n?|
|00000100| f4 20 4d 45 4d 43 20 70 | 61 67 65 73 20 61 72 65 |. MEMC p|ages are|
|00000110| 20 72 65 71 75 65 73 74 | 65 64 20 61 73 20 74 68 | request|ed as th|
|00000120| 65 20 6e 75 6d 62 65 72 | 20 6f 66 20 6d 61 63 68 |e number| of mach|
|00000130| 69 6e 65 73 20 67 72 6f | 77 73 2e 0d 00 78 04 0d |ines gro|ws...x..|
|00000140| 00 82 14 56 65 72 24 3d | 22 32 2e 30 33 20 28 50 |...Ver$=|"2.03 (P|
|00000150| 44 29 22 0d 00 8c 04 0d | 00 96 0b f4 20 42 75 67 |D)".....|.... Bug|
|00000160| 73 2e 0d 00 a0 04 0d 00 | aa 0c 44 65 62 75 67 25 |s.......|..Debug%|
|00000170| 3d a3 0d 00 b4 04 0d 00 | be 0e e7 20 44 65 62 75 |=.......|... Debu|
|00000180| 67 25 20 8c 0d 00 c8 0f | 20 20 de 20 42 75 67 25 |g% .....| . Bug%|
|00000190| 32 35 36 0d 00 d2 22 20 | 20 2a 4b 45 59 31 4c 4f |256..." | *KEY1LO|
|000001a0| 41 44 22 21 52 75 6e 49 | 6d 61 67 65 22 7c 4d 45 |AD"!RunI|mage"|ME|
|000001b0| 44 49 54 7c 4d 0d 00 dc | 13 20 20 2a 4b 45 59 34 |DIT|M...|. *KEY4|
|000001c0| 51 55 49 54 7c 4d 7c 4d | 0d 00 e6 12 20 20 2a 4b |QUIT|M|M|.... *K|
|000001d0| 45 59 31 32 45 44 49 54 | 7c 4d 0d 00 f0 05 cd 0d |EY12EDIT||M......|
|000001e0| 00 fa 04 0d 01 04 09 f2 | 76 61 72 73 0d 01 0e 04 |........|vars....|
|000001f0| 0d 01 18 36 de 20 71 25 | 26 33 30 30 2c 69 25 26 |...6. q%|&300,i%&|
|00000200| 31 30 30 2c 43 75 72 42 | 75 66 25 26 31 30 30 30 |100,CurB|uf%&1000|
|00000210| 3a 45 6e 64 42 75 66 25 | 3d 43 75 72 42 75 66 25 |:EndBuf%|=CurBuf%|
|00000220| 2b 26 31 30 30 30 0d 01 | 22 13 de 20 45 72 72 6f |+&1000..|".. Erro|
|00000230| 72 41 64 64 72 25 28 34 | 29 0d 01 2c 10 6d 61 78 |rAddr%(4|)..,.max|
|00000240| 62 75 66 25 3d 32 35 30 | 30 0d 01 36 20 de 20 62 |buf%=250|0..6 . b|
|00000250| 75 66 66 65 72 25 20 6d | 61 78 62 75 66 25 2c 65 |uffer% m|axbuf%,e|
|00000260| 6e 64 62 75 66 25 20 2d | 31 0d 01 40 0d 44 73 4d |ndbuf% -|1..@.DsM|
|00000270| 65 6e 75 25 3d 30 0d 01 | 4a 0d 43 68 4d 65 6e 75 |enu%=0..|J.ChMenu|
|00000280| 25 3d 30 0d 01 54 0d 53 | 63 4d 65 6e 75 25 3d 30 |%=0..T.S|cMenu%=0|
|00000290| 0d 01 5e 04 0d 01 68 1d | ee 20 85 20 f2 5f 45 72 |..^...h.|. . ._Er|
|000002a0| 72 6f 72 42 6f 78 3a f2 | 5f 46 69 6e 69 73 68 3a |rorBox:.|_Finish:|
|000002b0| e0 0d 01 72 04 0d 01 7c | 30 c8 99 22 57 69 6d 70 |...r...||0.."Wimp|
|000002c0| 5f 49 6e 69 74 69 61 6c | 69 73 65 22 2c 32 30 30 |_Initial|ise",200|
|000002d0| 2c 26 34 42 35 33 34 31 | 35 34 2c 22 4d 61 63 68 |,&4B5341|54,"Mach|
|000002e0| 69 6e 65 73 22 0d 01 86 | 0d f2 5f 49 6e 69 74 28 |ines"...|.._Init(|
|000002f0| 30 29 0d 01 90 04 0d 01 | 9a 04 0d 01 a4 04 0d 01 |0)......|........|
|00000300| ae 04 0d 01 b8 0d f2 5f | 52 65 61 64 56 44 55 0d |......._|ReadVDU.|
|00000310| 01 c2 04 0d 01 cc 13 49 | 63 6f 6e 25 3d a4 5f 49 |.......I|con%=._I|
|00000320| 63 6f 6e 42 61 72 0d 01 | d6 04 0d 01 e0 36 c8 99 |conBar..|.....6..|
|00000330| 20 22 57 69 6d 70 5f 4f | 70 65 6e 54 65 6d 70 6c | "Wimp_O|penTempl|
|00000340| 61 74 65 22 2c 2c 22 3c | 4d 61 63 68 69 6e 65 73 |ate",,"<|Machines|
|00000350| 24 44 69 72 3e 2e 54 65 | 6d 70 6c 61 74 65 73 22 |$Dir>.Te|mplates"|
|00000360| 0d 01 ea 2b ee 20 85 20 | c8 99 20 22 57 69 6d 70 |...+. . |.. "Wimp|
|00000370| 5f 43 6c 6f 73 65 54 65 | 6d 70 6c 61 74 65 73 22 |_CloseTe|mplates"|
|00000380| 3a f2 5f 45 72 72 6f 72 | 42 6f 78 0d 01 f4 24 50 |:._Error|Box...$P|
|00000390| 72 6f 67 49 6e 66 6f 25 | 3d a4 5f 54 65 6d 70 6c |rogInfo%|=._Templ|
|000003a0| 61 74 65 28 22 50 72 6f | 67 49 6e 66 6f 22 29 0d |ate("Pro|gInfo").|
|000003b0| 01 fe 24 44 69 73 70 6c | 61 79 25 3d 20 a4 5f 54 |..$Displ|ay%= ._T|
|000003c0| 65 6d 70 6c 61 74 65 28 | 22 4d 61 63 68 69 6e 65 |emplate(|"Machine|
|000003d0| 73 22 29 0d 02 08 04 0d | 02 12 2c 20 20 6d 69 6e |s").....|.., min|
|000003e0| 65 78 74 65 6e 74 25 3d | a9 20 a4 6d 65 6d 74 6f |extent%=|. .memto|
|000003f0| 73 74 72 28 71 25 2b 37 | 32 2c 31 32 29 2a 31 36 |str(q%+7|2,12)*16|
|00000400| 2b 36 34 0d 02 1c 14 20 | 20 6d 69 6e 65 78 74 65 |+64.... | minexte|
|00000410| 6e 74 25 3d 31 38 30 0d | 02 26 1a c8 99 22 57 69 |nt%=180.|.&..."Wi|
|00000420| 6d 70 5f 43 6c 6f 73 65 | 54 65 6d 70 6c 61 74 65 |mp_Close|Template|
|00000430| 22 0d 02 30 04 0d 02 3a | 1d ee 20 85 20 f2 5f 45 |"..0...:|.. . ._E|
|00000440| 72 72 6f 72 42 6f 78 3a | f2 5f 46 69 6e 69 73 68 |rrorBox:|._Finish|
|00000450| 3a e0 0d 02 44 04 0d 02 | 4e 39 de 20 4d 65 6e 75 |:...D...|N9. Menu|
|00000460| 53 70 61 63 65 25 26 31 | 30 30 30 2c 4c 25 2d 31 |Space%&1|000,L%-1|
|00000470| 3a e3 41 25 3d 4d 65 6e | 75 53 70 61 63 65 25 b8 |:.A%=Men|uSpace%.|
|00000480| 20 4c 25 2d 34 88 34 3a | 21 41 25 3d 30 3a ed 0d | L%-4.4:|!A%=0:..|
|00000490| 02 58 0e de 20 43 62 75 | 66 25 32 35 36 0d 02 62 |.X.. Cbu|f%256..b|
|000004a0| 2e 24 28 43 62 75 66 25 | 2b 31 32 38 29 3d 22 61 |.$(Cbuf%|+128)="a|
|000004b0| 30 2d 39 61 2e 22 3a f4 | 20 56 61 6c 69 64 61 74 |0-9a.":.| Validat|
|000004c0| 69 6f 6e 20 73 74 72 69 | 6e 67 2e 0d 02 6c 0f 6d |ion stri|ng...l.m|
|000004d0| 6f 70 74 25 3d 25 31 30 | 31 30 0d 02 76 1a 43 68 |opt%=%10|10..v.Ch|
|000004e0| 65 63 6b 24 3d 22 43 68 | 65 63 6b 20 78 78 78 2e |eck$="Ch|eck xxx.|
|000004f0| 79 79 79 22 0d 02 80 26 | 4d 65 6e 75 31 25 3d a4 |yyy"...&|Menu1%=.|
|00000500| 5f 42 75 69 6c 64 5f 4d | 65 6e 75 5f 31 5f 28 4d |_Build_M|enu_1_(M|
|00000510| 65 6e 75 53 70 61 63 65 | 25 29 0d 02 8a 1e 4d 25 |enuSpace|%)....M%|
|00000520| 3d a4 5f 42 75 69 6c 64 | 5f 4d 65 6e 75 5f 32 5f |=._Build|_Menu_2_|
|00000530| 28 4d 65 6e 75 31 25 29 | 0d 02 94 04 0d 02 9e 39 |(Menu1%)|.......9|
|00000540| c8 99 22 45 63 6f 6e 65 | 74 5f 52 65 61 64 4c 6f |.."Econe|t_ReadLo|
|00000550| 63 61 6c 53 74 61 74 69 | 6f 6e 41 6e 64 4e 65 74 |calStati|onAndNet|
|00000560| 22 20 b8 20 4d 79 53 74 | 61 74 69 6f 6e 25 2c 4d |" . MySt|ation%,M|
|00000570| 79 4e 65 74 25 0d 02 a8 | 04 0d 02 b2 22 f2 5f 43 |yNet%...|...."._C|
|00000580| 68 61 6e 67 65 49 63 6f | 6e 28 50 72 6f 67 49 6e |hangeIco|n(ProgIn|
|00000590| 66 6f 25 2c 34 2c 56 65 | 72 24 29 0d 02 bc 11 e7 |fo%,4,Ve|r$).....|
|000005a0| 20 4d 79 4e 65 74 25 3c | 3e 30 20 8c 0d 02 c6 48 | MyNet%<|>0 ....H|
|000005b0| 20 20 f2 5f 43 68 61 6e | 67 65 54 69 74 6c 65 42 | ._Chan|geTitleB|
|000005c0| 61 72 28 44 69 73 70 6c | 61 79 25 2c 22 45 63 6f |ar(Displ|ay%,"Eco|
|000005d0| 6e 65 74 20 6d 61 63 68 | 69 6e 65 20 6c 69 73 74 |net mach|ine list|
|000005e0| 20 6f 6e 20 6e 65 74 20 | 22 2b c3 28 4d 79 4e 65 | on net |"+.(MyNe|
|000005f0| 74 25 29 29 0d 02 d0 05 | cd 0d 02 da 04 0d 02 e4 |t%))....|........|
|00000600| 0a 4e 6f 77 25 3d 30 0d | 02 ee 05 f5 0d 02 f8 25 |.Now%=0.|.......%|
|00000610| 20 20 c8 99 22 4f 53 5f | 52 65 61 64 4d 6f 6e 6f | .."OS_|ReadMono|
|00000620| 74 6f 6e 69 63 54 69 6d | 65 22 20 b8 20 4e 6f 77 |tonicTim|e" . Now|
|00000630| 25 0d 03 02 31 20 20 c8 | 99 22 57 69 6d 70 5f 50 |%...1 .|."Wimp_P|
|00000640| 6f 6c 6c 49 64 6c 65 22 | 2c 2c 71 25 2c 4e 6f 77 |ollIdle"|,,q%,Now|
|00000650| 25 2b 53 74 69 6d 65 25 | 20 b8 20 41 63 74 69 6f |%+Stime%| . Actio|
|00000660| 6e 25 0d 03 0c 14 20 20 | 20 20 c8 8e 20 41 63 74 |n%.... | .. Act|
|00000670| 69 6f 6e 25 20 ca 0d 03 | 16 17 20 20 20 20 20 20 |ion% ...|.. |
|00000680| c9 20 30 3a 20 f2 5f 44 | 6f 57 6f 72 6b 0d 03 20 |. 0: ._D|oWork.. |
|00000690| 20 f4 20 20 20 20 20 20 | 20 57 48 45 4e 20 20 31 | . | WHEN 1|
|000006a0| 3a 20 50 52 4f 43 5f 52 | 65 64 72 61 77 0d 03 2a |: PROC_R|edraw..*|
|000006b0| 46 20 20 20 20 20 20 c9 | 20 20 32 3a 20 f2 5f 4f |F .| 2: ._O|
|000006c0| 70 65 6e 28 21 71 25 2c | 71 25 21 34 2c 71 25 21 |pen(!q%,|q%!4,q%!|
|000006d0| 38 2c 71 25 21 31 32 2c | 71 25 21 31 36 2c 71 25 |8,q%!12,|q%!16,q%|
|000006e0| 21 32 30 2c 71 25 21 32 | 34 2c 71 25 21 32 38 2c |!20,q%!2|4,q%!28,|
|000006f0| 2d 31 29 0d 03 34 1c 20 | 20 20 20 20 20 c9 20 20 |-1)..4. | . |
|00000700| 33 3a 20 f2 5f 43 6c 6f | 73 65 28 21 71 25 29 0d |3: ._Clo|se(!q%).|
|00000710| 03 3e 38 20 20 20 20 20 | 20 c9 20 20 36 3a 20 f2 |.>8 | . 6: .|
|00000720| 5f 4d 6f 75 73 65 28 21 | 71 25 2c 71 25 21 34 2c |_Mouse(!|q%,q%!4,|
|00000730| 71 25 21 38 2c 71 25 21 | 31 32 2c 71 25 21 31 36 |q%!8,q%!|12,q%!16|
|00000740| 2c 71 25 21 32 30 29 0d | 03 48 44 f4 20 20 20 20 |,q%!20).|.HD. |
|00000750| 20 20 20 57 48 45 4e 20 | 20 38 3a 20 50 52 4f 43 | WHEN | 8: PROC|
|00000760| 5f 6b 65 79 28 21 71 25 | 2c 71 25 21 34 2c 71 25 |_key(!q%|,q%!4,q%|
|00000770| 21 38 2c 71 25 21 31 32 | 2c 71 25 21 31 36 2c 71 |!8,q%!12|,q%!16,q|
|00000780| 25 21 32 30 2c 71 25 21 | 32 34 29 0d 03 52 1c 20 |%!20,q%!|24)..R. |
|00000790| 20 20 20 20 20 c9 20 20 | 39 3a 20 f2 5f 44 65 63 | . |9: ._Dec|
|000007a0| 6f 64 65 4d 65 6e 75 0d | 03 5c 1e 20 20 20 20 20 |odeMenu.|.\. |
|000007b0| 20 c9 20 31 37 2c 31 38 | 3a f2 72 65 63 65 69 76 | . 17,18|:.receiv|
|000007c0| 65 28 71 25 29 0d 03 66 | 07 20 20 cb 0d 03 70 06 |e(q%)..f|. ...p.|
|000007d0| fd a3 0d 03 7a 05 e0 0d | 03 84 04 0d 03 8e 10 dd |....z...|........|
|000007e0| 20 f2 5f 47 65 74 57 28 | 68 25 29 0d 03 98 0a 21 | ._GetW(|h%)....!|
|000007f0| 71 25 3d 68 25 0d 03 a2 | 1f c8 99 22 57 69 6d 70 |q%=h%...|..."Wimp|
|00000800| 5f 47 65 74 57 69 6e 64 | 6f 77 53 74 61 74 65 22 |_GetWind|owState"|
|00000810| 2c 2c 71 25 0d 03 ac 1b | 53 74 61 72 74 58 25 3d |,,q%....|StartX%=|
|00000820| 71 25 21 20 34 2b 4c 4d | 25 2d 71 25 21 32 30 0d |q%! 4+LM|%-q%!20.|
|00000830| 03 b6 1b 53 74 61 72 74 | 59 25 3d 71 25 21 31 36 |...Start|Y%=q%!16|
|00000840| 2d 54 4d 25 2d 71 25 21 | 32 34 0d 03 c0 05 e1 0d |-TM%-q%!|24......|
|00000850| 03 ca 04 0d 03 d4 13 dd | 20 f2 5f 47 65 74 49 28 |........| ._GetI(|
|00000860| 68 25 2c 69 25 29 0d 03 | de 2d 21 71 25 3d 68 25 |h%,i%)..|.-!q%=h%|
|00000870| 3a 71 25 21 34 3d 69 25 | 3a c8 99 20 22 57 69 6d |:q%!4=i%|:.. "Wim|
|00000880| 70 5f 47 65 74 49 63 6f | 6e 53 74 61 74 65 22 2c |p_GetIco|nState",|
|00000890| 2c 71 25 0d 03 e8 2e 69 | 78 30 25 3d 71 25 21 38 |,q%....i|x0%=q%!8|
|000008a0| 3a 69 79 30 25 3d 71 25 | 21 31 32 3a 69 78 31 25 |:iy0%=q%|!12:ix1%|
|000008b0| 3d 71 25 21 31 36 3a 69 | 79 31 25 3d 71 25 21 32 |=q%!16:i|y1%=q%!2|
|000008c0| 30 0d 03 f2 1e 69 66 6c | 61 67 73 25 3d 71 25 21 |0....ifl|ags%=q%!|
|000008d0| 32 34 3a 69 64 61 74 61 | 25 3d 71 25 2b 32 38 0d |24:idata|%=q%+28.|
|000008e0| 03 fc 05 e1 0d 04 06 04 | 0d 04 10 11 dd 20 f2 5f |........|..... ._|
|000008f0| 46 72 6f 6e 74 28 68 25 | 29 0d 04 1a 0a 21 71 25 |Front(h%|)....!q%|
|00000900| 3d 68 25 0d 04 24 28 c8 | 99 22 57 69 6d 70 5f 47 |=h%..$(.|."Wimp_G|
|00000910| 65 74 57 69 6e 64 6f 77 | 53 74 61 74 65 22 2c 2c |etWindow|State",,|
|00000920| 71 25 3a 71 25 21 32 38 | 3d 2d 31 0d 04 2e 1b c8 |q%:q%!28|=-1.....|
|00000930| 99 22 57 69 6d 70 5f 4f | 70 65 6e 57 69 6e 64 6f |."Wimp_O|penWindo|
|00000940| 77 22 2c 2c 71 25 0d 04 | 38 05 e1 0d 04 42 04 0d |w",,q%..|8....B..|
|00000950| 04 4c 40 dd 20 f2 5f 4f | 70 65 6e 28 68 61 6e 64 |.L@. ._O|pen(hand|
|00000960| 6c 65 25 2c 78 30 25 2c | 79 30 25 2c 78 31 25 20 |le%,x0%,|y0%,x1% |
|00000970| 2c 79 31 25 20 20 2c 73 | 63 78 25 20 2c 73 63 79 |,y1% ,s|cx% ,scy|
|00000980| 25 20 2c 62 68 61 6e 64 | 6c 65 25 2c 46 25 29 0d |% ,bhand|le%,F%).|
|00000990| 04 56 12 e7 68 61 6e 64 | 6c 65 25 3d 2d 31 8c 20 |.V..hand|le%=-1. |
|000009a0| e1 0d 04 60 04 0d 04 6a | 04 0d 04 74 4b 21 71 25 |...`...j|...tK!q%|
|000009b0| 3d 68 61 6e 64 6c 65 25 | 3a 71 25 21 34 3d 78 30 |=handle%|:q%!4=x0|
|000009c0| 25 3a 71 25 21 38 3d 79 | 30 25 3a 71 25 21 31 32 |%:q%!8=y|0%:q%!12|
|000009d0| 3d 78 31 25 3a 71 25 21 | 31 36 3d 79 31 25 3a 71 |=x1%:q%!|16=y1%:q|
|000009e0| 25 21 32 30 3d 73 63 78 | 25 3a 71 25 21 32 34 3d |%!20=scx|%:q%!24=|
|000009f0| 73 63 79 25 0d 04 7e 2a | 71 25 21 32 38 3d 62 68 |scy%..~*|q%!28=bh|
|00000a00| 61 6e 64 6c 65 25 3a c8 | 99 22 57 69 6d 70 5f 4f |andle%:.|."Wimp_O|
|00000a10| 70 65 6e 57 69 6e 64 6f | 77 22 2c 2c 71 25 0d 04 |penWindo|w",,q%..|
|00000a20| 88 04 0d 04 92 0a e7 20 | 46 25 20 8c 0d 04 9c 80 |....... |F% .....|
|00000a30| 20 20 e7 20 28 44 6d 6f | 64 65 25 3d 30 29 20 80 | . (Dmo|de%=0) .|
|00000a40| 20 28 68 61 6e 64 6c 65 | 25 3d 44 69 73 70 6c 61 | (handle|%=Displa|
|00000a50| 79 25 29 20 80 20 28 78 | 69 74 65 6d 73 25 20 3c |y%) . (x|items% <|
|00000a60| 3e 20 a8 20 28 28 78 31 | 25 2d 78 30 25 29 2f 31 |> . ((x1|%-x0%)/1|
|00000a70| 38 38 29 29 20 80 20 ac | 28 78 69 74 65 6d 73 25 |88)) . .|(xitems%|
|00000a80| 3d 31 20 80 20 a8 20 28 | 28 78 31 25 2d 78 30 25 |=1 . . (|(x1%-x0%|
|00000a90| 29 2f 31 38 38 29 20 3c | 20 31 29 8c 20 f2 5f 46 |)/188) <| 1). ._F|
|00000aa0| 6f 72 6d 61 74 44 69 73 | 70 6c 61 79 0d 04 a6 80 |ormatDis|play....|
|00000ab0| 20 20 e7 20 28 44 6d 6f | 64 65 25 3d 32 29 20 80 | . (Dmo|de%=2) .|
|00000ac0| 20 28 68 61 6e 64 6c 65 | 25 3d 44 69 73 70 6c 61 | (handle|%=Displa|
|00000ad0| 79 25 29 20 80 20 28 78 | 69 74 65 6d 73 25 20 3c |y%) . (x|items% <|
|00000ae0| 3e 20 a8 20 28 28 78 31 | 25 2d 78 30 25 29 2f 31 |> . ((x1|%-x0%)/1|
|00000af0| 36 36 29 29 20 80 20 ac | 28 78 69 74 65 6d 73 25 |66)) . .|(xitems%|
|00000b00| 3d 31 20 80 20 a8 20 28 | 28 78 31 25 2d 78 30 25 |=1 . . (|(x1%-x0%|
|00000b10| 29 2f 31 36 36 29 20 3c | 20 31 29 8c 20 f2 5f 46 |)/166) <| 1). ._F|
|00000b20| 6f 72 6d 61 74 44 69 73 | 70 6c 61 79 0d 04 b0 05 |ormatDis|play....|
|00000b30| cd 0d 04 ba 05 e1 0d 04 | c4 04 0d 04 ce 16 dd 20 |........|....... |
|00000b40| f2 5f 43 6c 6f 73 65 28 | 48 61 6e 64 6c 65 25 29 |._Close(|Handle%)|
|00000b50| 0d 04 d8 28 21 71 25 3d | 48 61 6e 64 6c 65 25 3a |...(!q%=|Handle%:|
|00000b60| c8 99 22 57 69 6d 70 5f | 43 6c 6f 73 65 57 69 6e |.."Wimp_|CloseWin|
|00000b70| 64 6f 77 22 2c 2c 71 25 | 0d 04 e2 05 e1 0d 04 ec |dow",,q%|........|
|00000b80| 04 0d 04 f6 11 dd 20 f2 | 5f 43 6c 6f 73 65 4d 65 |...... .|_CloseMe|
|00000b90| 6e 75 0d 05 00 1b c8 99 | 22 57 69 6d 70 5f 43 72 |nu......|"Wimp_Cr|
|00000ba0| 65 61 74 65 4d 65 6e 75 | 22 2c 2c 2d 31 0d 05 0a |eateMenu|",,-1...|
|00000bb0| 05 e1 0d 05 14 04 0d 05 | 1e 1c dd 20 f2 5f 43 68 |........|... ._Ch|
|00000bc0| 61 6e 67 65 49 63 6f 6e | 28 57 25 2c 49 25 2c 49 |angeIcon|(W%,I%,I|
|00000bd0| 24 29 0d 05 28 2d 21 71 | 25 3d 57 25 3a 71 25 21 |$)..(-!q|%=W%:q%!|
|00000be0| 34 3d 49 25 3a c8 99 20 | 22 57 69 6d 70 5f 47 65 |4=I%:.. |"Wimp_Ge|
|00000bf0| 74 49 63 6f 6e 53 74 61 | 74 65 22 2c 2c 71 25 0d |tIconSta|te",,q%.|
|00000c00| 05 32 47 24 28 71 25 21 | 32 38 29 3d 49 24 3a 21 |.2G$(q%!|28)=I$:!|
|00000c10| 69 25 3d 57 25 3a 69 25 | 21 34 3d 49 25 3a 69 25 |i%=W%:i%|!4=I%:i%|
|00000c20| 21 38 3d 30 3a 69 25 21 | 31 32 3d 30 3a c8 99 22 |!8=0:i%!|12=0:.."|
|00000c30| 57 69 6d 70 5f 53 65 74 | 49 63 6f 6e 53 74 61 74 |Wimp_Set|IconStat|
|00000c40| 65 22 2c 2c 69 25 0d 05 | 3c 05 e1 0d 05 46 04 0d |e",,i%..|<....F..|
|00000c50| 05 50 0f dd 20 a4 5f 49 | 63 6f 6e 42 61 72 0d 05 |.P.. ._I|conBar..|
|00000c60| 5a 08 ea 20 5a 25 0d 05 | 64 31 f4 20 21 69 25 3d |Z.. Z%..|d1. !i%=|
|00000c70| 2d 32 3a 69 25 21 34 3d | 30 3a 69 25 21 38 3d 2d |-2:i%!4=|0:i%!8=-|
|00000c80| 31 32 3a 69 25 21 31 32 | 3d 38 2a 38 2a 32 3a 69 |12:i%!12|=8*8*2:i|
|00000c90| 25 21 31 36 3d 39 32 0d | 05 6e 2e 20 20 20 20 21 |%!16=92.|.n. !|
|00000ca0| 69 25 3d 2d 31 3a 69 25 | 21 34 3d 30 3a 69 25 21 |i%=-1:i%|!4=0:i%!|
|00000cb0| 38 3d 30 3a 69 25 21 31 | 32 3d 36 38 3a 69 25 21 |8=0:i%!1|2=68:i%!|
|00000cc0| 31 36 3d 36 38 0d 05 78 | 2b 69 25 21 32 30 3d 25 |16=68..x|+i%!20=%|
|00000cd0| 30 30 30 31 30 31 31 31 | 30 30 30 30 30 30 30 30 |00010111|00000000|
|00000ce0| 30 31 31 30 30 30 30 31 | 30 30 30 31 31 30 31 30 |01100001|00011010|
|00000cf0| 0d 05 82 38 de 20 5a 25 | 20 31 32 3a 69 25 21 32 |...8. Z%| 12:i%!2|
|00000d00| 34 3d 5a 25 3a 24 28 69 | 25 21 32 34 29 3d 22 21 |4=Z%:$(i|%!24)="!|
|00000d10| 4d 61 63 68 69 6e 65 73 | 22 3a 49 63 6f 6e 53 74 |Machines|":IconSt|
|00000d20| 72 69 6e 67 25 3d 5a 25 | 0d 05 8c 0b 69 25 21 32 |ring%=Z%|....i%!2|
|00000d30| 38 3d 31 0d 05 96 0c 69 | 25 21 33 32 3d 31 31 0d |8=1....i|%!32=11.|
|00000d40| 05 a0 21 c8 99 22 57 69 | 6d 70 5f 43 72 65 61 74 |..!.."Wi|mp_Creat|
|00000d50| 65 49 63 6f 6e 22 2c 2c | 69 25 20 b8 20 69 63 25 |eIcon",,|i% . ic%|
|00000d60| 0d 05 aa 08 3d 69 63 25 | 0d 05 b4 04 0d 05 be 12 |....=ic%|........|
|00000d70| dd 20 f2 72 65 63 65 69 | 76 65 28 71 25 29 0d 05 |. .recei|ve(q%)..|
|00000d80| c8 13 20 20 6f 6c 64 71 | 25 3d 71 25 2b 26 31 30 |.. oldq|%=q%+&10|
|00000d90| 30 0d 05 d2 28 20 20 e3 | 20 49 25 3d 30 20 b8 20 |0...( .| I%=0 . |
|00000da0| 21 71 25 2d 31 20 88 34 | 3a 6f 6c 64 71 25 21 49 |!q%-1 .4|:oldq%!I|
|00000db0| 25 3d 71 25 21 49 25 3a | ed 0d 05 dc 10 20 20 c8 |%=q%!I%:|..... .|
|00000dc0| 8e 20 71 25 21 31 36 20 | ca 0d 05 e6 16 20 20 20 |. q%!16 |..... |
|00000dd0| 20 c9 20 30 3a f2 5f 46 | 69 6e 69 73 68 3a e0 0d | . 0:._F|inish:..|
|00000de0| 05 f0 29 20 20 20 20 c9 | 20 26 35 30 32 20 3a 20 |..) .| &502 : |
|00000df0| f2 5f 52 65 71 75 65 73 | 74 48 65 6c 70 28 71 25 |._Reques|tHelp(q%|
|00000e00| 21 34 2c 71 25 21 38 29 | 0d 05 fa 24 20 20 20 20 |!4,q%!8)|...$ |
|00000e10| c9 20 26 34 30 30 43 30 | 3a 20 f4 20 53 75 62 2d |. &400C0|: . Sub-|
|00000e20| 6d 65 6e 75 20 77 61 72 | 6e 69 6e 67 0d 06 04 1b |menu war|ning....|
|00000e30| 20 20 20 20 20 20 c8 8e | 20 43 75 72 72 65 6e 74 | ..| Current|
|00000e40| 4d 65 6e 75 25 20 ca 0d | 06 0e 0f 20 20 20 20 20 |Menu% ..|... |
|00000e50| 20 20 20 c9 20 31 0d 06 | 18 18 20 20 20 20 20 20 | . 1..|.. |
|00000e60| 20 20 20 20 c8 8e 20 71 | 25 21 33 32 20 ca 0d 06 | .. q|%!32 ...|
|00000e70| 22 34 20 20 20 20 20 20 | 20 20 20 20 20 20 c9 20 |"4 | . |
|00000e80| 30 3a f2 5f 41 64 6a 75 | 73 74 4d 65 6e 75 31 28 |0:._Adju|stMenu1(|
|00000e90| 71 25 21 32 30 2c 71 25 | 21 32 34 2c 71 25 21 32 |q%!20,q%|!24,q%!2|
|00000ea0| 38 29 0d 06 2c 13 20 20 | 20 20 20 20 20 20 20 20 |8)..,. | |
|00000eb0| 20 20 c9 20 31 0d 06 36 | 0f 20 20 20 20 20 20 20 | . 1..6|. |
|00000ec0| 20 20 20 cb 0d 06 40 0b | 20 20 20 20 20 20 cb 0d | ...@.| ..|
|00000ed0| 06 4a 1a 20 20 20 20 c9 | 20 26 34 30 30 43 31 3a |.J. .| &400C1:|
|00000ee0| f2 5f 52 65 61 64 56 44 | 55 0d 06 54 07 20 20 cb |._ReadVD|U..T. .|
|00000ef0| 0d 06 5e 05 e1 0d 06 68 | 04 0d 06 72 39 dd 20 f2 |..^....h|...r9. .|
|00000f00| 5f 4d 6f 75 73 65 28 6d | 78 25 2c 6d 79 25 2c 62 |_Mouse(m|x%,my%,b|
|00000f10| 75 74 74 6f 6e 73 25 2c | 68 61 6e 64 6c 65 25 2c |uttons%,|handle%,|
|00000f20| 69 63 6f 6e 25 2c 6f 6c | 64 62 75 74 74 6f 6e 73 |icon%,ol|dbuttons|
|00000f30| 25 29 0d 06 7c 11 c8 8e | 20 62 75 74 74 6f 6e 73 |%)..|...| buttons|
|00000f40| 25 20 ca 0d 06 86 04 0d | 06 90 1a 20 20 c9 20 26 |% ......|... . &|
|00000f50| 30 32 20 3a f4 20 4d 65 | 6e 75 20 62 75 74 74 6f |02 :. Me|nu butto|
|00000f60| 6e 0d 06 9a 14 20 20 20 | 20 c8 8e 20 68 61 6e 64 |n.... | .. hand|
|00000f70| 6c 65 25 20 ca 0d 06 a4 | 0e 20 20 20 20 20 20 c9 |le% ....|. .|
|00000f80| 20 2d 32 0d 06 ae 16 20 | 20 20 20 20 20 20 20 c8 | -2.... | .|
|00000f90| 8e 20 69 63 6f 6e 25 20 | ca 0d 06 b8 38 20 20 20 |. icon% |....8 |
|00000fa0| 20 20 20 20 20 20 20 c9 | 20 49 63 6f 6e 25 3a f2 | .| Icon%:.|
|00000fb0| 5f 44 6f 4d 65 6e 75 5f | 31 28 6d 78 25 2c 6d 79 |_DoMenu_|1(mx%,my|
|00000fc0| 25 29 3a 43 75 72 72 65 | 6e 74 4d 65 6e 75 25 3d |%):Curre|ntMenu%=|
|00000fd0| 31 0d 06 c2 0d 20 20 20 | 20 20 20 20 20 cb 0d 06 |1.... | ...|
|00000fe0| cc 38 20 20 20 20 20 20 | c9 20 44 69 73 70 6c 61 |.8 |. Displa|
|00000ff0| 79 25 20 3a f2 5f 44 6f | 4d 65 6e 75 5f 32 28 6d |y% :._Do|Menu_2(m|
|00001000| 78 25 2c 6d 79 25 29 3a | 43 75 72 72 65 6e 74 4d |x%,my%):|CurrentM|
|00001010| 65 6e 75 25 3d 32 0d 06 | d6 09 20 20 20 20 cb 0d |enu%=2..|.. ..|
|00001020| 06 e0 04 0d 06 ea 28 20 | 20 c9 20 26 30 31 2c 26 |......( | . &01,&|
|00001030| 30 34 20 3a f4 20 53 65 | 6c 65 63 74 2f 41 64 6a |04 :. Se|lect/Adj|
|00001040| 75 73 74 20 62 75 74 74 | 6f 6e 73 0d 06 f4 14 20 |ust butt|ons.... |
|00001050| 20 20 20 c8 8e 20 68 61 | 6e 64 6c 65 25 20 ca 0d | .. ha|ndle% ..|
|00001060| 06 fe 0e 20 20 20 20 20 | 20 c9 20 2d 32 0d 07 08 |... | . -2...|
|00001070| 16 20 20 20 20 20 20 20 | 20 c8 8e 20 69 63 6f 6e |. | .. icon|
|00001080| 25 20 ca 0d 07 12 27 20 | 20 20 20 20 20 20 20 20 |% ....' | |
|00001090| 20 c9 20 49 63 6f 6e 25 | 3a f2 5f 46 72 6f 6e 74 | . Icon%|:._Front|
|000010a0| 28 44 69 73 70 6c 61 79 | 25 29 0d 07 1c 0d 20 20 |(Display|%).... |
|000010b0| 20 20 20 20 20 20 cb 0d | 07 26 09 20 20 20 20 cb | ..|.&. .|
|000010c0| 0d 07 30 05 cb 0d 07 3a | 05 e1 0d 07 44 04 0d 07 |..0....:|....D...|
|000010d0| 4e 14 dd 20 a4 5f 54 65 | 6d 70 6c 61 74 65 28 61 |N.. ._Te|mplate(a|
|000010e0| 24 29 0d 07 58 07 ea 63 | 25 0d 07 62 4b c8 99 22 |$)..X..c|%..bK.."|
|000010f0| 57 69 6d 70 5f 4c 6f 61 | 64 54 65 6d 70 6c 61 74 |Wimp_Loa|dTemplat|
|00001100| 65 22 2c 2c 62 75 66 66 | 65 72 25 2c 43 75 72 42 |e",,buff|er%,CurB|
|00001110| 75 66 25 2c 45 6e 64 42 | 75 66 25 2c 2d 31 2c 61 |uf%,EndB|uf%,-1,a|
|00001120| 24 2c 30 20 b8 2c 2c 43 | 75 72 42 75 66 25 2c 2c |$,0 .,,C|urBuf%,,|
|00001130| 2c 2c 63 25 0d 07 6c 2e | e7 20 63 25 3d 30 20 8c |,,c%..l.|. c%=0 .|
|00001140| 20 85 20 31 2c 22 54 65 | 6d 70 6c 61 74 65 20 27 | . 1,"Te|mplate '|
|00001150| 22 2b 61 24 2b 22 27 20 | 6e 6f 74 20 66 6f 75 6e |"+a$+"' |not foun|
|00001160| 64 22 0d 07 76 27 c8 99 | 22 57 69 6d 70 5f 43 72 |d"..v'..|"Wimp_Cr|
|00001170| 65 61 74 65 57 69 6e 64 | 6f 77 22 2c 2c 62 75 66 |eateWind|ow",,buf|
|00001180| 66 65 72 25 20 b8 20 63 | 25 0d 07 80 07 3d 63 25 |fer% . c|%....=c%|
|00001190| 0d 07 8a 04 0d 07 94 19 | dd 20 f2 5f 44 6f 4d 65 |........|. ._DoMe|
|000011a0| 6e 75 5f 31 28 6d 78 25 | 2c 6d 79 25 29 0d 07 9e |nu_1(mx%|,my%)...|
|000011b0| 21 76 6f 69 64 25 3d a4 | 5f 42 75 69 6c 64 5f 4d |!void%=.|_Build_M|
|000011c0| 65 6e 75 5f 31 5f 28 4d | 65 6e 75 31 25 29 0d 07 |enu_1_(M|enu1%)..|
|000011d0| a8 2b c8 99 20 43 72 4d | 65 6e 75 2c 2c 4d 65 6e |.+.. CrM|enu,,Men|
|000011e0| 75 31 25 2c 6d 78 25 2d | 33 32 2c 39 36 2b 38 30 |u1%,mx%-|32,96+80|
|000011f0| 2b 34 30 20 2d 33 32 2d | 38 0d 07 b2 20 6d 78 25 |+40 -32-|8... mx%|
|00001200| 3d 6d 78 25 2d 33 32 3a | 6d 79 25 3d 39 36 2b 38 |=mx%-32:|my%=96+8|
|00001210| 30 2b 34 30 2d 33 32 2d | 38 0d 07 bc 15 6d 31 78 |0+40-32-|8....m1x|
|00001220| 25 3d 6d 78 25 3a 6d 31 | 79 25 3d 6d 79 25 0d 07 |%=mx%:m1|y%=my%..|
|00001230| c6 05 e1 0d 07 d0 04 0d | 07 da 1d dd 20 f2 5f 41 |........|.... ._A|
|00001240| 64 6a 75 73 74 4d 65 6e | 75 31 28 4d 25 2c 58 25 |djustMen|u1(M%,X%|
|00001250| 2c 59 25 29 0d 07 e4 1e | f4 20 74 68 69 73 20 69 |,Y%)....|. this i|
|00001260| 73 20 72 65 61 6c 6c 79 | 20 61 20 77 69 6e 64 6f |s really| a windo|
|00001270| 77 2e 0d 07 ee 25 e7 20 | 58 25 3e 73 63 72 78 31 |w....%. |X%>scrx1|
|00001280| 25 2d 35 32 32 2d 32 20 | 58 25 3d 73 63 72 78 31 |%-522-2 |X%=scrx1|
|00001290| 25 2d 35 32 32 2d 32 0d | 07 f8 14 e7 20 59 25 3c |%-522-2.|.... Y%<|
|000012a0| 32 31 36 20 20 59 25 3d | 32 31 36 0d 08 02 24 c8 |216 Y%=|216...$.|
|000012b0| 99 22 57 69 6d 70 5f 43 | 72 65 61 74 65 53 75 62 |."Wimp_C|reateSub|
|000012c0| 4d 65 6e 75 22 2c 2c 4d | 25 2c 58 25 2c 59 25 0d |Menu",,M|%,X%,Y%.|
|000012d0| 08 0c 05 e1 0d 08 16 04 | 0d 08 20 24 dd 20 a4 5f |........|.. $. ._|
|000012e0| 42 75 69 6c 64 5f 4d 65 | 6e 75 5f 31 5f 28 4d 25 |Build_Me|nu_1_(M%|
|000012f0| 29 3a ea 20 63 25 3a 50 | 25 3d 4d 25 0d 08 2a 2c |):. c%:P|%=M%..*,|
|00001300| 5b 4f 50 54 6d 6f 70 74 | 25 3a 2e 4d 65 6e 75 31 |[OPTmopt|%:.Menu1|
|00001310| 25 20 a4 5f 48 65 61 64 | 65 72 28 22 4d 61 63 68 |% ._Head|er("Mach|
|00001320| 69 6e 65 73 22 2c 38 29 | 0d 08 34 1b a4 5f 4d 28 |ines",8)|..4.._M(|
|00001330| 30 2c 50 72 6f 67 49 6e | 66 6f 25 2c 22 49 6e 66 |0,ProgIn|fo%,"Inf|
|00001340| 6f 22 29 0d 08 3e 15 3b | a4 5f 4d 28 30 2c 30 2c |o")..>.;|._M(0,0,|
|00001350| 22 43 6c 65 61 72 22 29 | 0d 08 48 15 a4 5f 4d 28 |"Clear")|..H.._M(|
|00001360| 2d 31 2c 2d 31 2c 22 51 | 75 69 74 22 29 0d 08 52 |-1,-1,"Q|uit")..R|
|00001370| 0f 41 4c 49 47 4e 3a 5d | 3a 3d 50 25 0d 08 5c 04 |.ALIGN:]|:=P%..\.|
|00001380| 0d 08 66 19 dd 20 f2 5f | 44 6f 4d 65 6e 75 5f 32 |..f.. ._|DoMenu_2|
|00001390| 28 6d 78 25 2c 6d 79 25 | 29 0d 08 70 08 ea 20 4d |(mx%,my%|)..p.. M|
|000013a0| 24 0d 08 7a 1f c8 99 22 | 57 69 6d 70 5f 47 65 74 |$..z..."|Wimp_Get|
|000013b0| 50 6f 69 6e 74 65 72 49 | 6e 66 6f 22 2c 2c 71 25 |PointerI|nfo",,q%|
|000013c0| 0d 08 84 0f 69 63 6f 6e | 25 3d 71 25 21 31 36 0d |....icon|%=q%!16.|
|000013d0| 08 8e 11 e7 20 69 63 6f | 6e 25 3c 3e 2d 31 20 8c |.... ico|n%<>-1 .|
|000013e0| 0d 08 98 2b 20 20 43 68 | 65 63 6b 24 3d 22 43 68 |...+ Ch|eck$="Ch|
|000013f0| 65 63 6b 20 22 2b a4 5f | 4e 65 74 28 42 61 73 65 |eck "+._|Net(Base|
|00001400| 25 2b 34 30 2a 69 63 6f | 6e 25 29 0d 08 a2 12 20 |%+40*ico|n%).... |
|00001410| 20 43 68 65 63 6b 25 3d | 69 63 6f 6e 25 0d 08 ac | Check%=|icon%...|
|00001420| 22 20 20 24 43 62 75 66 | 25 3d a4 5f 4e 65 74 28 |" $Cbuf|%=._Net(|
|00001430| 42 61 73 65 25 2b 34 30 | 2a 69 63 6f 6e 25 29 0d |Base%+40|*icon%).|
|00001440| 08 b6 05 cc 0d 08 c0 14 | 20 20 43 68 65 63 6b 24 |........| Check$|
|00001450| 3d 22 43 68 65 63 6b 22 | 0d 08 ca 0f 20 20 43 68 |="Check"|.... Ch|
|00001460| 65 63 6b 25 3d 2d 31 0d | 08 d4 0e 20 24 43 62 75 |eck%=-1.|... $Cbu|
|00001470| 66 25 3d 22 22 0d 08 de | 05 cd 0d 08 e8 21 76 6f |f%=""...|.....!vo|
|00001480| 69 64 25 3d a4 5f 42 75 | 69 6c 64 5f 4d 65 6e 75 |id%=._Bu|ild_Menu|
|00001490| 5f 32 5f 28 4d 65 6e 75 | 32 25 29 0d 08 f2 23 c8 |_2_(Menu|2%)...#.|
|000014a0| 99 20 43 72 4d 65 6e 75 | 2c 2c 4d 65 6e 75 32 25 |. CrMenu|,,Menu2%|
|000014b0| 2c 6d 78 25 2d 33 32 2c | 6d 79 25 2d 33 32 0d 08 |,mx%-32,|my%-32..|
|000014c0| fc 19 6d 78 25 3d 6d 78 | 25 2d 33 32 3a 6d 79 25 |..mx%=mx|%-32:my%|
|000014d0| 3d 6d 79 25 2d 33 32 0d | 09 06 15 6d 32 78 25 3d |=my%-32.|...m2x%=|
|000014e0| 6d 78 25 3a 6d 32 79 25 | 3d 6d 79 25 0d 09 10 05 |mx%:m2y%|=my%....|
|000014f0| e1 0d 09 1a 04 0d 09 24 | 24 dd 20 a4 5f 42 75 69 |.......$|$. ._Bui|
|00001500| 6c 64 5f 4d 65 6e 75 5f | 32 5f 28 4d 25 29 3a ea |ld_Menu_|2_(M%):.|
|00001510| 20 63 25 3a 50 25 3d 4d | 25 0d 09 2e 0d 5b 4f 50 | c%:P%=M|%....[OP|
|00001520| 54 6d 6f 70 74 25 0d 09 | 38 22 2e 4d 65 6e 75 32 |Tmopt%..|8".Menu2|
|00001530| 25 20 a4 5f 48 65 61 64 | 65 72 28 22 4d 61 63 68 |% ._Head|er("Mach|
|00001540| 69 6e 65 73 22 2c 39 29 | 0d 09 42 37 a4 5f 4d 65 |ines",9)|..B7._Me|
|00001550| 6e 75 49 74 65 6d 28 30 | 2c 30 2c 30 2c 30 2c 30 |nuItem(0|,0,0,0,0|
|00001560| 2c 20 30 2c 44 73 4d 65 | 6e 75 25 2c 26 37 30 30 |, 0,DsMe|nu%,&700|
|00001570| 30 30 32 31 2c 22 44 69 | 73 70 6c 61 79 22 29 0d |0021,"Di|splay").|
|00001580| 09 4c 35 a4 5f 4d 65 6e | 75 49 74 65 6d 28 30 2c |.L5._Men|uItem(0,|
|00001590| 30 2c 30 2c 30 2c 30 2c | 20 30 2c 43 68 4d 65 6e |0,0,0,0,| 0,ChMen|
|000015a0| 75 25 2c 26 37 30 30 30 | 30 32 31 2c 22 43 68 65 |u%,&7000|021,"Che|
|000015b0| 63 6b 22 29 0d 09 56 34 | a4 5f 4d 65 6e 75 49 74 |ck")..V4|._MenuIt|
|000015c0| 65 6d 28 30 2c 30 2c 30 | 2c 30 2c 30 2c 2d 31 2c |em(0,0,0|,0,0,-1,|
|000015d0| 53 63 4d 65 6e 75 25 2c | 26 37 30 30 30 30 32 31 |ScMenu%,|&7000021|
|000015e0| 2c 22 53 63 61 6e 22 29 | 0d 09 60 04 0d 09 6a 23 |,"Scan")|..`...j#|
|000015f0| 2e 44 73 4d 65 6e 75 25 | 20 a4 5f 48 65 61 64 65 |.DsMenu%| ._Heade|
|00001600| 72 28 22 44 69 73 70 6c | 61 79 22 2c 31 36 29 0d |r("Displ|ay",16).|
|00001610| 09 74 3d a4 5f 4d 65 6e | 75 49 74 65 6d 28 30 2c |.t=._Men|uItem(0,|
|00001620| 30 2c 44 6d 6f 64 65 25 | 3d 30 20 2c 30 2c 30 2c |0,Dmode%|=0 ,0,0,|
|00001630| 20 30 2c 30 2c 26 37 30 | 30 30 30 32 31 2c 22 4c | 0,0,&70|00021,"L|
|00001640| 61 72 67 65 20 69 63 6f | 6e 73 22 29 0d 09 7e 3d |arge ico|ns")..~=|
|00001650| a4 5f 4d 65 6e 75 49 74 | 65 6d 28 30 2c 30 2c 44 |._MenuIt|em(0,0,D|
|00001660| 6d 6f 64 65 25 3d 32 20 | 2c 30 2c 30 2c 20 30 2c |mode%=2 |,0,0, 0,|
|00001670| 30 2c 26 37 30 30 30 30 | 32 31 2c 22 53 6d 61 6c |0,&70000|21,"Smal|
|00001680| 6c 20 69 63 6f 6e 73 22 | 29 0d 09 88 3b a4 5f 4d |l icons"|)...;._M|
|00001690| 65 6e 75 49 74 65 6d 28 | 30 2c 30 2c 44 6d 6f 64 |enuItem(|0,0,Dmod|
|000016a0| 65 25 3d 31 20 2c 31 2c | 30 2c 20 30 2c 30 2c 26 |e%=1 ,1,|0, 0,0,&|
|000016b0| 37 30 30 30 30 32 31 2c | 22 46 75 6c 6c 20 69 6e |7000021,|"Full in|
|000016c0| 66 6f 22 29 0d 09 92 04 | 0d 09 9c 3f a4 5f 4d 65 |fo")....|...?._Me|
|000016d0| 6e 75 49 74 65 6d 28 30 | 2c 30 2c 53 6f 72 74 25 |nuItem(0|,0,Sort%|
|000016e0| 3d 30 20 2c 30 2c 30 2c | 20 30 2c 30 2c 26 37 30 |=0 ,0,0,| 0,0,&70|
|000016f0| 30 30 30 32 31 2c 22 53 | 6f 72 74 20 62 79 20 6e |00021,"S|ort by n|
|00001700| 75 6d 62 65 72 22 29 0d | 09 a6 3d a4 5f 4d 65 6e |umber").|..=._Men|
|00001710| 75 49 74 65 6d 28 30 2c | 30 2c 53 6f 72 74 25 3d |uItem(0,|0,Sort%=|
|00001720| 31 20 2c 30 2c 30 2c 20 | 30 2c 30 2c 26 37 30 30 |1 ,0,0, |0,0,&700|
|00001730| 30 30 32 31 2c 22 53 6f | 72 74 20 62 79 20 74 79 |0021,"So|rt by ty|
|00001740| 70 65 22 29 0d 09 b0 40 | a4 5f 4d 65 6e 75 49 74 |pe")...@|._MenuIt|
|00001750| 65 6d 28 30 2c 30 2c 53 | 6f 72 74 25 3d 32 20 2c |em(0,0,S|ort%=2 ,|
|00001760| 30 2c 30 2c 2d 31 2c 30 | 2c 26 37 30 30 30 30 32 |0,0,-1,0|,&700002|
|00001770| 31 2c 22 53 6f 72 74 20 | 62 79 20 76 65 72 73 69 |1,"Sort |by versi|
|00001780| 6f 6e 22 29 0d 09 ba 04 | 0d 09 c4 20 2e 43 68 4d |on")....|... .ChM|
|00001790| 65 6e 75 25 20 a4 5f 48 | 65 61 64 65 72 28 22 43 |enu% ._H|eader("C|
|000017a0| 68 65 63 6b 22 2c 39 29 | 0d 09 ce 35 a4 5f 4d 65 |heck",9)|...5._Me|
|000017b0| 6e 75 49 74 65 6d 28 30 | 2c 30 2c 30 20 20 20 20 |nuItem(0|,0,0 |
|000017c0| 20 20 20 2c 30 2c 43 62 | 75 66 25 2c 2d 31 2c 30 | ,0,Cb|uf%,-1,0|
|000017d0| 2c 26 37 30 30 30 30 32 | 31 2c 22 22 29 0d 09 d8 |,&700002|1,"")...|
|000017e0| 04 0d 09 e2 20 2e 53 63 | 4d 65 6e 75 25 20 a4 5f |.... .Sc|Menu% ._|
|000017f0| 48 65 61 64 65 72 28 22 | 53 63 61 6e 22 2c 31 30 |Header("|Scan",10|
|00001800| 29 0d 09 ec 3b a4 5f 4d | 65 6e 75 49 74 65 6d 28 |)...;._M|enuItem(|
|00001810| 30 2c 30 2c 53 6d 6f 64 | 65 25 3d 31 20 2c 30 2c |0,0,Smod|e%=1 ,0,|
|00001820| 30 2c 20 30 2c 30 2c 26 | 37 30 30 30 30 32 31 2c |0, 0,0,&|7000021,|
|00001830| 22 46 61 73 74 20 73 63 | 61 6e 22 29 0d 09 f6 3b |"Fast sc|an")...;|
|00001840| a4 5f 4d 65 6e 75 49 74 | 65 6d 28 30 2c 30 2c 53 |._MenuIt|em(0,0,S|
|00001850| 6d 6f 64 65 25 3d 32 20 | 2c 30 2c 30 2c 20 30 2c |mode%=2 |,0,0, 0,|
|00001860| 30 2c 26 37 30 30 30 30 | 32 31 2c 22 53 6c 6f 77 |0,&70000|21,"Slow|
|00001870| 20 73 63 61 6e 22 29 0d | 0a 00 3b a4 5f 4d 65 6e | scan").|..;._Men|
|00001880| 75 49 74 65 6d 28 30 2c | 30 2c 53 6d 6f 64 65 25 |uItem(0,|0,Smode%|
|00001890| 3d 30 20 2c 30 2c 30 2c | 2d 31 2c 30 2c 26 37 30 |=0 ,0,0,|-1,0,&70|
|000018a0| 30 30 30 32 31 2c 22 53 | 74 6f 70 20 73 63 61 6e |00021,"S|top scan|
|000018b0| 22 29 0d 0a 0a 18 4f 50 | 54 6d 6f 70 74 25 3a 41 |")....OP|Tmopt%:A|
|000018c0| 4c 49 47 4e 3a 5d 3a 3d | 50 25 0d 0a 14 04 0d 0a |LIGN:]:=|P%......|
|000018d0| 1e 15 dd 20 a4 5f 48 65 | 61 64 65 72 28 4d 24 2c |... ._He|ader(M$,|
|000018e0| 57 25 29 0d 0a 28 26 e7 | 20 a9 4d 24 3e 31 31 20 |W%)..(&.| .M$>11 |
|000018f0| 85 31 2c 22 4d 65 6e 75 | 20 74 69 74 6c 65 20 74 |.1,"Menu| title t|
|00001900| 6f 6f 20 6c 6f 6e 67 21 | 22 0d 0a 32 29 5b 4f 50 |oo long!|"..2)[OP|
|00001910| 54 6d 6f 70 74 25 3a 45 | 51 55 53 20 4d 24 2b bd |Tmopt%:E|QUS M$+.|
|00001920| 31 33 2b c4 31 31 2d a9 | 28 4d 24 29 2c bd 28 30 |13+.11-.|(M$),.(0|
|00001930| 29 29 0d 0a 3c 3e 45 51 | 55 42 20 37 3a 45 51 55 |))..<>EQ|UB 7:EQU|
|00001940| 42 20 32 3a 45 51 55 42 | 20 37 3a 45 51 55 42 20 |B 2:EQUB| 7:EQUB |
|00001950| 30 3a 45 51 55 44 20 57 | 25 2a 31 36 3a 45 51 55 |0:EQUD W|%*16:EQU|
|00001960| 44 20 34 30 3a 45 51 55 | 44 20 30 3a 5d 3a 3d 30 |D 40:EQU|D 0:]:=0|
|00001970| 0d 0a 46 04 0d 0a 50 45 | dd 20 a4 5f 4d 28 45 25 |..F...PE|. ._M(E%|
|00001980| 2c 6c 25 2c 4d 24 29 3a | 3d a4 5f 4d 65 6e 75 49 |,l%,M$):|=._MenuI|
|00001990| 74 65 6d 28 94 28 6c 25 | 3c 3e 2d 31 29 2c 30 2c |tem(.(l%|<>-1),0,|
|000019a0| 30 2c 30 2c 30 2c 45 25 | 2c 6c 25 2c 26 30 37 30 |0,0,0,E%|,l%,&070|
|000019b0| 30 30 30 32 31 2c 4d 24 | 29 0d 0a 5a 04 0d 0a 64 |00021,M$|)..Z...d|
|000019c0| 2c dd 20 a4 5f 4d 65 6e | 75 49 74 65 6d 28 77 25 |,. ._Men|uItem(w%|
|000019d0| 2c 67 25 2c 54 25 2c 44 | 25 2c 57 25 2c 6c 25 2c |,g%,T%,D|%,W%,l%,|
|000019e0| 70 25 2c 49 25 2c 49 24 | 29 0d 0a 6e 08 ea 20 66 |p%,I%,I$|)..n.. f|
|000019f0| 25 0d 0a 78 0d 66 25 3d | a9 49 24 3e 31 31 0d 0a |%..x.f%=|.I$>11..|
|00001a00| 82 4c f4 20 57 41 52 4e | 49 4e 47 2c 47 72 65 79 |.L. WARN|ING,Grey|
|00001a10| 2c 54 49 43 4b 2c 44 4f | 54 54 45 44 20 4c 49 4e |,TICK,DO|TTED LIN|
|00001a20| 45 2c 57 52 49 54 45 41 | 42 4c 45 2c 4c 41 53 54 |E,WRITEA|BLE,LAST|
|00001a30| 2c 20 50 4f 49 4e 54 45 | 52 2c 49 43 4f 4e 20 46 |, POINTE|R,ICON F|
|00001a40| 4c 41 47 53 2c 49 43 4f | 4e 24 0d 0a 8c 34 f4 20 |LAGS,ICO|N$...4. |
|00001a50| 57 72 69 74 65 61 62 6c | 65 20 69 73 20 61 20 70 |Writeabl|e is a p|
|00001a60| 74 72 20 74 6f 20 61 20 | 62 75 66 66 65 72 2c 75 |tr to a |buffer,u|
|00001a70| 70 20 74 6f 20 32 35 30 | 20 6c 6f 6e 67 21 0d 0a |p to 250| long!..|
|00001a80| 96 38 49 25 3d 49 25 84 | 28 28 31 3c 3c 32 32 29 |.8I%=I%.|((1<<22)|
|00001a90| 80 28 67 25 3c 3e 30 29 | 29 84 28 28 31 3c 3c 38 |.(g%<>0)|).((1<<8|
|00001aa0| 29 80 66 25 29 84 28 28 | 31 3c 3c 38 29 80 28 57 |).f%).((|1<<8).(W|
|00001ab0| 25 3c 3e 30 29 29 0d 0a | a0 0d 5b 4f 50 54 6d 6f |%<>0))..|..[OPTmo|
|00001ac0| 70 74 25 0d 0a aa 3c 45 | 51 55 44 28 31 80 54 25 |pt%...<E|QUD(1.T%|
|00001ad0| 3c 3e 30 29 2b 28 32 80 | 44 25 3c 3e 30 29 2b 28 |<>0)+(2.|D%<>0)+(|
|00001ae0| 34 80 57 25 3c 3e 30 29 | 2b 28 38 80 77 25 3c 3e |4.W%<>0)|+(8.w%<>|
|00001af0| 30 29 2b 28 26 38 30 20 | 80 6c 25 3c 3e 30 29 0d |0)+(&80 |.l%<>0).|
|00001b00| 0a b4 15 45 51 55 44 20 | 70 25 3a 45 51 55 44 20 |...EQUD |p%:EQUD |
|00001b10| 49 25 3a 5d 0d 0a be 0a | e7 20 66 25 20 8c 0d 0a |I%:]....|. f% ...|
|00001b20| c8 31 20 20 f4 20 49 6e | 64 69 72 65 63 74 65 64 |.1 . In|directed|
|00001b30| 20 73 74 72 69 6e 67 20 | 61 73 20 69 74 20 69 73 | string |as it is|
|00001b40| 20 6c 6f 6e 67 65 72 20 | 74 68 61 6e 20 31 31 0d | longer |than 11.|
|00001b50| 0a d2 0a 20 20 ea 20 41 | 25 0d 0a dc 0c 20 20 41 |... . A|%.... A|
|00001b60| 25 3d 21 50 25 0d 0a e6 | 14 20 20 e7 41 25 3e 90 |%=!P%...|. .A%>.|
|00001b70| 20 80 20 41 25 3c 93 20 | 8c 0d 0a f0 2d 20 20 20 | . A%<. |....- |
|00001b80| 20 f4 20 41 20 6c 69 74 | 74 6c 65 20 62 69 74 20 | . A lit|tle bit |
|00001b90| 63 6c 75 64 64 67 79 20 | 62 75 74 20 69 74 20 77 |cluddgy |but it w|
|00001ba0| 69 6c 6c 20 64 6f 0d 0a | fa 0e 20 20 20 20 24 71 |ill do..|.. $q|
|00001bb0| 25 3d 49 24 0d 0b 04 35 | 20 20 20 20 e7 20 28 21 |%=I$...5| . (!|
|00001bc0| 41 25 3d 21 71 25 29 20 | 80 20 28 28 41 25 21 34 |A%=!q%) |. ((A%!4|
|00001bd0| 29 3d 71 25 21 34 29 20 | 80 20 28 28 41 25 21 38 |)=q%!4) |. ((A%!8|
|00001be0| 29 3d 71 25 21 38 29 20 | 8c 0d 0b 0e 09 20 20 20 |)=q%!8) |..... |
|00001bf0| 20 cc 0d 0b 18 10 20 20 | 20 20 20 20 41 25 3d a9 | ..... | A%=.|
|00001c00| 49 24 0d 0b 22 17 20 20 | 20 20 20 20 de 20 5a 25 |I$..". | . Z%|
|00001c10| 41 25 3a 21 50 25 3d 5a | 25 0d 0b 2c 18 20 20 20 |A%:!P%=Z|%..,. |
|00001c20| 20 20 20 50 25 21 34 3d | b9 3a 50 25 21 38 3d 41 | P%!4=|.:P%!8=A|
|00001c30| 25 0d 0b 36 09 20 20 20 | 20 cd 0d 0b 40 0d 20 20 |%..6. | ...@. |
|00001c40| 24 21 50 25 3d 49 24 0d | 0b 4a 0e 20 20 50 25 3d |$!P%=I$.|.J. P%=|
|00001c50| 50 25 2b 31 32 0d 0b 54 | 07 20 20 cc 0d 0b 5e 0e |P%+12..T|. ...^.|
|00001c60| 20 20 20 20 41 25 3d a9 | 49 24 0d 0b 68 15 20 20 | A%=.|I$..h. |
|00001c70| 20 20 de 20 5a 25 41 25 | 3a 21 50 25 3d 5a 25 0d | . Z%A%|:!P%=Z%.|
|00001c80| 0b 72 16 20 20 20 20 50 | 25 21 34 3d b9 3a 50 25 |.r. P|%!4=.:P%|
|00001c90| 21 38 3d 41 25 0d 0b 7c | 0f 20 20 20 20 24 21 50 |!8=A%..||. $!P|
|00001ca0| 25 3d 49 24 0d 0b 86 10 | 20 20 20 20 50 25 3d 50 |%=I$....| P%=P|
|00001cb0| 25 2b 31 32 0d 0b 90 07 | 20 20 cd 0d 0b 9a 04 0d |%+12....| ......|
|00001cc0| 0b a4 05 cc 0d 0b ae 1c | 20 20 f4 20 4e 6f 6e 20 |........| . Non |
|00001cd0| 69 6e 64 69 72 65 63 74 | 20 73 74 72 69 6e 67 2e |indirect| string.|
|00001ce0| 0d 0b b8 0f 20 20 e7 20 | 57 25 3c 3e 30 20 8c 0d |.... . |W%<>0 ..|
|00001cf0| 0b c2 12 20 20 20 20 f4 | 20 57 72 69 74 61 62 6c |... .| Writabl|
|00001d00| 65 0d 0b cc 0f 20 20 20 | 20 50 25 21 30 3d 57 25 |e.... | P%!0=W%|
|00001d10| 0d 0b d6 13 20 20 20 20 | 50 25 21 34 3d 57 25 2b |.... |P%!4=W%+|
|00001d20| 31 32 38 0d 0b e0 10 20 | 20 20 20 50 25 21 38 3d |128.... | P%!8=|
|00001d30| 31 32 37 0d 0b ea 10 20 | 20 20 20 50 25 3d 50 25 |127.... | P%=P%|
|00001d40| 2b 31 32 0d 0b f4 07 20 | 20 cc 0d 0b fe 17 20 20 |+12.... | ..... |
|00001d50| 20 20 f4 20 4e 6f 74 20 | 77 72 69 74 65 61 62 6c | . Not |writeabl|
|00001d60| 65 0d 0c 08 2f 20 20 20 | 20 5b 4f 50 54 6d 6f 70 |e.../ | [OPTmop|
|00001d70| 74 25 3a 45 51 55 53 20 | 49 24 2b bd 31 33 2b c4 |t%:EQUS |I$+.13+.|
|00001d80| 31 31 2d a9 28 49 24 29 | 2c bd 28 30 29 29 3a 5d |11-.(I$)|,.(0)):]|
|00001d90| 0d 0c 12 07 20 20 cd 0d | 0c 1c 05 cd 0d 0c 26 06 |.... ..|......&.|
|00001da0| 3d 30 0d 0c 30 04 0d 0c | 3a 12 dd 20 f2 5f 44 65 |=0..0...|:.. ._De|
|00001db0| 63 6f 64 65 4d 65 6e 75 | 0d 0c 44 08 ea 20 4d 25 |codeMenu|..D.. M%|
|00001dc0| 0d 0c 4e 17 20 20 c8 8e | 20 43 75 72 72 65 6e 74 |..N. ..| Current|
|00001dd0| 4d 65 6e 75 25 20 ca 0d | 0c 58 0b 20 20 20 20 c9 |Menu% ..|.X. .|
|00001de0| 20 31 0d 0c 62 26 20 20 | 20 20 20 20 c8 99 20 44 | 1..b& | .. D|
|00001df0| 63 4d 65 6e 75 2c 2c 4d | 65 6e 75 31 25 2c 71 25 |cMenu,,M|enu1%,q%|
|00001e00| 2c 71 25 2b 26 31 30 30 | 0d 0c 6c 19 20 20 20 20 |,q%+&100|..l. |
|00001e10| 20 20 c8 8e 20 24 28 71 | 25 2b 26 31 30 30 29 20 | .. $(q|%+&100) |
|00001e20| ca 0d 0c 76 1e 20 20 20 | 20 20 20 20 20 c9 20 22 |...v. | . "|
|00001e30| 49 6e 66 6f 22 20 20 3a | 20 f4 20 69 6e 66 6f 0d |Info" :| . info.|
|00001e40| 0c 80 31 20 20 20 20 20 | 20 20 20 c9 20 22 43 6c |..1 | . "Cl|
|00001e50| 65 61 72 22 20 3a 20 f2 | 5f 49 6e 69 74 28 31 29 |ear" : .|_Init(1)|
|00001e60| 3a f2 5f 46 6f 72 6d 61 | 74 44 69 73 70 6c 61 79 |:._Forma|tDisplay|
|00001e70| 0d 0c 8a 20 20 20 20 20 | 20 20 20 20 c9 20 22 51 |... | . "Q|
|00001e80| 75 69 74 22 20 20 3a 20 | f2 5f 46 69 6e 69 73 68 |uit" : |._Finish|
|00001e90| 0d 0c 94 0b 20 20 20 20 | 20 20 cb 0d 0c 9e 0b 20 |.... | ..... |
|00001ea0| 20 20 20 c9 20 32 0d 0c | a8 26 20 20 20 20 20 20 | . 2..|.& |
|00001eb0| c8 99 20 44 63 4d 65 6e | 75 2c 2c 4d 65 6e 75 32 |.. DcMen|u,,Menu2|
|00001ec0| 25 2c 71 25 2c 71 25 2b | 26 31 30 30 0d 0c b2 19 |%,q%,q%+|&100....|
|00001ed0| 20 20 20 20 20 20 c8 8e | 20 24 28 71 25 2b 26 31 | ..| $(q%+&1|
|00001ee0| 30 30 29 20 ca 0d 0c bc | 39 20 f4 20 20 20 20 20 |00) ....|9 . |
|00001ef0| 20 20 20 57 48 45 4e 20 | 22 43 68 65 63 6b 2e 22 | WHEN |"Check."|
|00001f00| 2b 43 68 65 63 6b 24 20 | 20 20 20 20 20 20 20 20 |+Check$ | |
|00001f10| 20 20 3a 20 50 52 4f 43 | 5f 43 68 65 63 6b 0d 0c | : PROC|_Check..|
|00001f20| c6 42 20 20 20 20 20 20 | 20 20 c9 20 22 44 69 73 |.B | . "Dis|
|00001f30| 70 6c 61 79 2e 4c 61 72 | 67 65 20 69 63 6f 6e 73 |play.Lar|ge icons|
|00001f40| 22 20 20 20 20 20 3a 20 | 44 6d 6f 64 65 25 3d 30 |" : |Dmode%=0|
|00001f50| 3a f2 5f 46 6f 72 6d 61 | 74 44 69 73 70 6c 61 79 |:._Forma|tDisplay|
|00001f60| 0d 0c d0 42 20 20 20 20 | 20 20 20 20 c9 20 22 44 |...B | . "D|
|00001f70| 69 73 70 6c 61 79 2e 53 | 6d 61 6c 6c 20 69 63 6f |isplay.S|mall ico|
|00001f80| 6e 73 22 20 20 20 20 20 | 3a 20 44 6d 6f 64 65 25 |ns" |: Dmode%|
|00001f90| 3d 32 3a f2 5f 46 6f 72 | 6d 61 74 44 69 73 70 6c |=2:._For|matDispl|
|00001fa0| 61 79 0d 0c da 42 20 20 | 20 20 20 20 20 20 c9 20 |ay...B | . |
|00001fb0| 22 44 69 73 70 6c 61 79 | 2e 46 75 6c 6c 20 69 6e |"Display|.Full in|
|00001fc0| 66 6f 22 20 20 20 20 20 | 20 20 3a 20 44 6d 6f 64 |fo" | : Dmod|
|00001fd0| 65 25 3d 31 3a f2 5f 46 | 6f 72 6d 61 74 44 69 73 |e%=1:._F|ormatDis|
|00001fe0| 70 6c 61 79 0d 0c e4 45 | 20 20 20 20 20 20 20 20 |play...E| |
|00001ff0| c9 20 22 44 69 73 70 6c | 61 79 2e 53 6f 72 74 20 |. "Displ|ay.Sort |
|00002000| 62 79 20 6e 75 6d 62 65 | 72 22 3a 53 6f 72 74 25 |by numbe|r":Sort%|
|00002010| 3d 30 3a f2 5f 53 6f 72 | 74 3a f2 5f 46 6f 72 6d |=0:._Sor|t:._Form|
|00002020| 61 74 44 69 73 70 6c 61 | 79 0d 0c ee 45 20 20 20 |atDispla|y...E |
|00002030| 20 20 20 20 20 c9 20 22 | 44 69 73 70 6c 61 79 2e | . "|Display.|
|00002040| 53 6f 72 74 20 62 79 20 | 74 79 70 65 22 20 20 3a |Sort by |type" :|
|00002050| 53 6f 72 74 25 3d 31 3a | f2 5f 53 6f 72 74 3a f2 |Sort%=1:|._Sort:.|
|00002060| 5f 46 6f 72 6d 61 74 44 | 69 73 70 6c 61 79 0d 0c |_FormatD|isplay..|
|00002070| f8 45 20 20 20 20 20 20 | 20 20 c9 22 44 69 73 70 |.E | ."Disp|
|00002080| 6c 61 79 2e 53 6f 72 74 | 20 62 79 20 76 65 72 73 |lay.Sort| by vers|
|00002090| 69 6f 6e 22 3a 53 6f 72 | 74 25 3d 32 3a f2 5f 53 |ion":Sor|t%=2:._S|
|000020a0| 6f 72 74 3a f2 5f 46 6f | 72 6d 61 74 44 69 73 70 |ort:._Fo|rmatDisp|
|000020b0| 6c 61 79 0d 0d 02 46 20 | 20 20 20 20 20 20 20 c9 |lay...F | .|
|000020c0| 20 22 53 63 61 6e 2e 46 | 61 73 74 20 73 63 61 6e | "Scan.F|ast scan|
|000020d0| 22 20 20 20 20 20 20 20 | 20 20 20 3a 20 53 6d 6f |" | : Smo|
|000020e0| 64 65 25 3d 31 3a 4f 6e | 4e 65 74 25 3d 30 3a 53 |de%=1:On|Net%=0:S|
|000020f0| 74 61 74 69 6f 6e 25 3d | 30 0d 0d 0c 32 20 20 20 |tation%=|0...2 |
|00002100| 20 20 20 20 20 c9 20 22 | 53 63 61 6e 2e 53 6c 6f | . "|Scan.Slo|
|00002110| 77 20 73 63 61 6e 22 20 | 20 20 20 20 20 20 20 20 |w scan" | |
|00002120| 20 3a 20 53 6d 6f 64 65 | 25 3d 32 0d 0d 16 32 20 | : Smode|%=2...2 |
|00002130| 20 20 20 20 20 20 20 c9 | 20 22 53 63 61 6e 2e 53 | .| "Scan.S|
|00002140| 74 6f 70 20 73 63 61 6e | 22 20 20 20 20 20 20 20 |top scan|" |
|00002150| 20 20 20 3a 20 53 6d 6f | 64 65 25 3d 30 0d 0d 20 | : Smo|de%=0.. |
|00002160| 0d 20 20 20 20 20 20 20 | 20 7f 0d 0d 2a 4e 20 20 |. | ...*N |
|00002170| 20 20 20 20 20 20 20 20 | e7 20 c0 24 28 71 25 2b | |. .$(q%+|
|00002180| 26 31 30 30 29 2c 36 29 | 3d 22 43 68 65 63 6b 2e |&100),6)|="Check.|
|00002190| 22 20 8c 20 f2 5f 43 68 | 65 63 6b 28 a4 5f 4e 65 |" . ._Ch|eck(._Ne|
|000021a0| 74 4e 75 6d 62 65 72 28 | c1 24 28 71 25 2b 26 31 |tNumber(|.$(q%+&1|
|000021b0| 30 30 29 2c 37 29 29 29 | 0d 0d 34 0b 20 20 20 20 |00),7)))|..4. |
|000021c0| 20 20 cb 0d 0d 3e 07 20 | 20 cb 0d 0d 48 04 0d 0d | ...>. | ...H...|
|000021d0| 52 11 20 20 c8 99 20 47 | 65 74 50 2c 2c 71 25 0d |R. .. G|etP,,q%.|
|000021e0| 0d 5c 12 20 20 e7 20 28 | 71 25 3f 38 29 80 31 20 |.\. . (|q%?8).1 |
|000021f0| 8c 0d 0d 66 19 20 20 20 | 20 c8 8e 20 43 75 72 72 |...f. | .. Curr|
|00002200| 65 6e 74 4d 65 6e 75 25 | 20 ca 0d 0d 70 25 20 20 |entMenu%| ...p% |
|00002210| 20 20 20 20 c9 20 31 20 | 3a 20 f2 5f 44 6f 4d 65 | . 1 |: ._DoMe|
|00002220| 6e 75 5f 31 28 6d 31 78 | 25 2c 6d 31 79 25 29 0d |nu_1(m1x|%,m1y%).|
|00002230| 0d 7a 25 20 20 20 20 20 | 20 c9 20 32 20 3a 20 f2 |.z% | . 2 : .|
|00002240| 5f 44 6f 4d 65 6e 75 5f | 32 28 6d 32 78 25 2c 6d |_DoMenu_|2(m2x%,m|
|00002250| 32 79 25 29 0d 0d 84 09 | 20 20 20 20 cb 0d 0d 8e |2y%)....| ....|
|00002260| 07 20 20 cd 0d 0d 98 05 | e1 0d 0d a2 04 0d 0d ac |. .....|........|
|00002270| 3e dd 20 f2 5f 6b 65 79 | 28 48 61 6e 64 6c 65 25 |>. ._key|(Handle%|
|00002280| 2c 49 63 6f 6e 25 2c 78 | 63 6f 66 66 25 2c 79 63 |,Icon%,x|coff%,yc|
|00002290| 6f 66 66 25 2c 63 61 72 | 65 74 68 25 2c 63 61 72 |off%,car|eth%,car|
|000022a0| 65 74 69 6e 64 25 2c 43 | 68 25 29 0d 0d b6 1b c8 |etind%,C|h%).....|
|000022b0| 99 22 57 69 6d 70 5f 50 | 72 6f 63 65 73 73 4b 65 |."Wimp_P|rocessKe|
|000022c0| 79 22 2c 43 68 25 0d 0d | c0 05 e1 0d 0d ca 04 0d |y",Ch%..|........|
|000022d0| 0d d4 23 dd 20 f2 5f 52 | 65 71 75 65 73 74 48 65 |..#. ._R|equestHe|
|000022e0| 6c 70 28 54 61 73 6b 25 | 2c 59 6f 75 72 52 65 66 |lp(Task%|,YourRef|
|000022f0| 25 29 0d 0d de 08 ea 20 | 72 25 0d 0d e8 0e c8 8e |%)..... |r%......|
|00002300| 20 71 25 21 33 32 20 ca | 0d 0d f2 0a 20 20 c9 20 | q%!32 .|.... . |
|00002310| 2d 32 0d 0d fc 85 20 20 | 20 20 f2 5f 53 65 6e 64 |-2.... | ._Send|
|00002320| 28 22 54 68 69 73 20 69 | 73 20 74 68 65 20 21 4d |("This i|s the !M|
|00002330| 61 63 68 69 6e 65 73 20 | 69 63 6f 6e 2e 7c 4d 49 |achines |icon.|MI|
|00002340| 74 20 6c 69 73 74 20 61 | 6c 6c 20 74 68 65 20 6d |t list a|ll the m|
|00002350| 61 63 68 69 6e 65 73 20 | 6f 6e 20 74 68 65 20 45 |achines |on the E|
|00002360| 63 6f 6e 65 74 2e 7c 4d | 43 6c 69 63 6b 20 53 45 |conet.|M|Click SE|
|00002370| 4c 45 43 54 20 68 65 72 | 65 20 74 6f 20 6f 70 65 |LECT her|e to ope|
|00002380| 6e 20 74 68 65 20 64 69 | 73 70 6c 61 79 20 77 69 |n the di|splay wi|
|00002390| 6e 64 6f 77 2e 22 29 0d | 0e 06 10 20 20 c9 20 44 |ndow.").|... . D|
|000023a0| 69 73 70 6c 61 79 25 0d | 0e 10 12 20 20 20 20 c8 |isplay%.|... .|
|000023b0| 8e 20 71 25 21 33 36 20 | ca 0d 0e 1a 04 0d 0e 24 |. q%!36 |.......$|
|000023c0| 86 20 20 20 20 c9 20 2d | 31 20 3a f2 5f 53 65 6e |. . -|1 :._Sen|
|000023d0| 64 28 22 54 68 69 73 20 | 69 73 20 74 68 65 20 21 |d("This |is the !|
|000023e0| 4d 61 63 68 69 6e 65 73 | 20 77 69 6e 64 6f 77 2e |Machines| window.|
|000023f0| 7c 4d 54 68 65 20 45 63 | 6f 6e 65 74 20 73 74 61 ||MThe Ec|onet sta|
|00002400| 74 69 6f 6e 73 20 61 72 | 65 20 73 68 6f 77 6e 20 |tions ar|e shown |
|00002410| 69 6e 20 68 65 72 65 2e | 7c 4d 43 6c 69 63 6b 20 |in here.||MClick |
|00002420| 4d 45 4e 55 20 74 6f 20 | 63 68 6f 6f 73 65 20 74 |MENU to |choose t|
|00002430| 68 65 20 64 69 73 70 6c | 61 79 20 73 74 79 6c 65 |he displ|ay style|
|00002440| 2e 22 29 0d 0e 2e 04 0d | 0e 38 09 20 20 20 20 7f |.").....|.8. .|
|00002450| 0d 0e 42 2f 20 20 20 20 | 20 20 e7 20 28 28 71 25 |..B/ | . ((q%|
|00002460| 21 33 36 29 20 3e 3d 30 | 29 20 80 20 28 28 71 25 |!36) >=0|) . ((q%|
|00002470| 21 33 36 29 3c 3d 69 74 | 65 6d 73 25 29 20 8c 0d |!36)<=it|ems%) ..|
|00002480| 0e 4c 1f 20 20 20 20 20 | 20 20 20 72 25 3d 42 61 |.L. | r%=Ba|
|00002490| 73 65 25 2b 34 30 2a 28 | 71 25 21 33 36 29 0d 0e |se%+40*(|q%!36)..|
|000024a0| 56 04 0d 0e 60 69 20 20 | 20 20 20 20 20 20 f2 5f |V...`i | ._|
|000024b0| 53 65 6e 64 28 22 4d 6f | 72 65 20 69 6e 66 6f 72 |Send("Mo|re infor|
|000024c0| 6d 61 74 69 6f 6e 20 6f | 6e 20 45 63 6f 6e 65 74 |mation o|n Econet|
|000024d0| 20 73 74 61 74 69 6f 6e | 20 22 2b a4 5f 4e 65 74 | station| "+._Net|
|000024e0| 28 72 25 29 2b 22 7c 4d | 22 2b a4 5f 4d 61 63 68 |(r%)+"|M|"+._Mach|
|000024f0| 69 6e 65 28 72 25 21 34 | 29 2b 22 7c 4d 22 2b a4 |ine(r%!4|)+"|M"+.|
|00002500| 5f 49 6e 66 6f 53 28 72 | 25 29 29 0d 0e 6a 0b 20 |_InfoS(r|%))..j. |
|00002510| 20 20 20 20 20 cd 0d 0e | 74 07 20 20 cb 0d 0e 7e | ...|t. ...~|
|00002520| 05 cb 0d 0e 88 05 e1 0d | 0e 92 04 0d 0e 9c 10 dd |........|........|
|00002530| 20 f2 5f 53 65 6e 64 28 | 4d 24 29 0d 0e a6 18 71 | ._Send(|M$)....q|
|00002540| 25 21 30 3d 28 a9 28 4d | 24 29 2b 32 38 29 20 80 |%!0=(.(M|$)+28) .|
|00002550| 26 46 43 0d 0e b0 12 71 | 25 21 31 32 3d 59 6f 75 |&FC....q|%!12=You|
|00002560| 72 52 65 66 25 0d 0e ba | 0e 71 25 21 31 36 3d 26 |rRef%...|.q%!16=&|
|00002570| 35 30 33 0d 0e c4 14 24 | 28 71 25 2b 32 30 29 3d |503....$|(q%+20)=|
|00002580| 4d 24 2b bd 28 30 29 0d | 0e ce 24 c8 99 22 57 69 |M$+.(0).|..$.."Wi|
|00002590| 6d 70 5f 53 65 6e 64 4d | 65 73 73 61 67 65 22 2c |mp_SendM|essage",|
|000025a0| 31 37 2c 71 25 2c 54 61 | 73 6b 25 0d 0e d8 05 e1 |17,q%,Ta|sk%.....|
|000025b0| 0d 0e e2 04 0d 0e ec 10 | dd 20 f2 5f 45 72 72 6f |........|. ._Erro|
|000025c0| 72 42 6f 78 0d 0e f6 12 | f4 20 53 59 53 20 44 72 |rBox....|. SYS Dr|
|000025d0| 61 67 2c 2c 2d 31 0d 0f | 00 41 ff 28 22 2a 4b 45 |ag,,-1..|.A.("*KE|
|000025e0| 59 31 42 41 53 49 43 7c | 4d 4c 4f 41 44 22 2b bd |Y1BASIC||MLOAD"+.|
|000025f0| 33 34 2b 22 21 52 75 6e | 49 6d 61 67 65 22 2b bd |34+"!Run|Image"+.|
|00002600| 33 34 2b 22 7c 4d 45 44 | 49 54 20 22 2b c3 28 9e |34+"|MED|IT "+.(.|
|00002610| 29 2b 22 7c 4d 22 29 0d | 0f 0a 0e 21 62 75 66 66 |)+"|M").|...!buff|
|00002620| 65 72 25 3d 9f 0d 0f 14 | 37 24 28 62 75 66 66 65 |er%=....|7$(buffe|
|00002630| 72 25 2b 34 29 3d f6 24 | 2b 22 20 28 69 6e 74 65 |r%+4)=.$|+" (inte|
|00002640| 72 6e 61 6c 20 65 72 72 | 6f 72 20 63 6f 64 65 20 |rnal err|or code |
|00002650| 22 2b c3 9e 2b 22 29 2e | 22 2b bd 30 0d 0f 1e 2e |"+..+").|"+.0....|
|00002660| c8 99 20 22 57 69 6d 70 | 5f 52 65 70 6f 72 74 45 |.. "Wimp|_ReportE|
|00002670| 72 72 6f 72 22 2c 62 75 | 66 66 65 72 25 2c 31 2c |rror",bu|ffer%,1,|
|00002680| 22 4d 61 63 68 69 6e 65 | 73 22 0d 0f 28 05 e1 0d |"Machine|s"..(...|
|00002690| 0f 32 05 20 0d 0f 3c 0e | dd 20 f2 5f 46 69 6e 69 |.2. ..<.|. ._Fini|
|000026a0| 73 68 0d 0f 46 25 f2 44 | 45 42 55 47 28 22 41 70 |sh..F%.D|EBUG("Ap|
|000026b0| 70 6c 69 63 61 74 69 6f | 6e 20 74 65 72 6d 69 6e |plicatio|n termin|
|000026c0| 61 74 65 73 2e 22 29 0d | 0f 50 17 c8 99 20 22 57 |ates.").|.P... "W|
|000026d0| 69 6d 70 5f 43 6c 6f 73 | 65 44 6f 77 6e 22 0d 0f |imp_Clos|eDown"..|
|000026e0| 5a 06 c8 98 0d 0f 64 05 | e1 0d 0f 6e 04 0d 0f 78 |Z.....d.|...n...x|
|000026f0| 0b dd 20 f2 76 61 72 73 | 0d 0f 82 1e 57 69 6d 70 |.. .vars|....Wimp|
|00002700| 20 20 20 20 3d 20 28 31 | 3c 3c 31 38 29 20 2b 20 | = (1|<<18) + |
|00002710| 28 33 3c 3c 36 29 0d 0f | 8c 14 43 72 65 61 74 65 |(3<<6)..|..Create|
|00002720| 57 20 3d 20 57 69 6d 70 | 2b 31 0d 0f 96 14 4f 70 |W = Wimp|+1....Op|
|00002730| 65 6e 57 20 20 20 3d 20 | 57 69 6d 70 2b 35 0d 0f |enW = |Wimp+5..|
|00002740| a0 14 43 6c 6f 73 65 57 | 20 20 3d 20 57 69 6d 70 |..CloseW| = Wimp|
|00002750| 2b 36 0d 0f aa 14 52 65 | 64 72 61 77 57 20 3d 20 |+6....Re|drawW = |
|00002760| 57 69 6d 70 2b 38 0d 0f | b4 14 55 70 64 61 74 65 |Wimp+8..|..Update|
|00002770| 57 20 3d 20 57 69 6d 70 | 2b 39 0d 0f be 15 47 65 |W = Wimp|+9....Ge|
|00002780| 74 52 25 20 20 20 3d 20 | 57 69 6d 70 2b 31 30 0d |tR% = |Wimp+10.|
|00002790| 0f c8 15 47 65 74 57 20 | 20 20 20 3d 20 57 69 6d |...GetW | = Wim|
|000027a0| 70 2b 31 31 0d 0f d2 15 | 47 65 74 50 20 20 20 20 |p+11....|GetP |
|000027b0| 3d 20 57 69 6d 70 2b 31 | 35 0d 0f dc 15 44 72 61 |= Wimp+1|5....Dra|
|000027c0| 67 20 20 20 20 3d 20 57 | 69 6d 70 2b 31 36 0d 0f |g = W|imp+16..|
|000027d0| e6 04 0d 0f f0 15 43 72 | 4d 65 6e 75 20 20 3d 20 |......Cr|Menu = |
|000027e0| 57 69 6d 70 2b 32 30 0d | 0f fa 15 44 63 4d 65 6e |Wimp+20.|...DcMen|
|000027f0| 75 20 20 3d 20 57 69 6d | 70 2b 32 31 0d 10 04 05 |u = Wim|p+21....|
|00002800| e1 0d 10 0e 04 0d 10 18 | 10 dd 20 f2 44 45 42 55 |........|.. .DEBU|
|00002810| 47 28 44 24 29 0d 10 22 | 0e e7 20 44 65 62 75 67 |G(D$).."|.. Debug|
|00002820| 25 20 8c 0d 10 2c 0a 20 | 20 ea 20 45 25 0d 10 36 |% ...,. | . E%..6|
|00002830| 15 20 20 e7 20 c2 44 24 | 2c 31 29 3d 22 3b 22 20 |. . .D$|,1)=";" |
|00002840| 20 8c 0d 10 40 17 20 20 | 20 20 44 24 3d c0 44 24 | ...@. | D$=.D$|
|00002850| 2c a9 28 44 24 29 2d 31 | 29 0d 10 4a 07 20 20 cc |,.(D$)-1|)..J. .|
|00002860| 0d 10 54 15 20 20 20 20 | 44 24 3d 44 24 2b bd 31 |..T. |D$=D$+.1|
|00002870| 33 2b bd 31 30 0d 10 5e | 07 20 20 cd 0d 10 68 13 |3+.10..^|. ...h.|
|00002880| 20 20 c8 95 20 28 a9 44 | 24 83 34 29 3c 3e 30 0d | .. (.D|$.4)<>0.|
|00002890| 10 72 10 20 20 20 20 44 | 24 3d 44 24 2b bd 30 0d |.r. D|$=D$+.0.|
|000028a0| 10 7c 07 20 20 ce 0d 10 | 86 39 20 20 21 42 75 67 |.|. ...|.9 !Bug|
|000028b0| 25 3d 28 32 30 2b a9 44 | 24 29 3a 42 75 67 25 21 |%=(20+.D|$):Bug%!|
|000028c0| 31 32 3d 30 3a 42 75 67 | 25 21 31 36 3d 26 35 30 |12=0:Bug|%!16=&50|
|000028d0| 35 3a 24 28 42 75 67 25 | 2b 32 30 29 3d 44 24 0d |5:$(Bug%|+20)=D$.|
|000028e0| 10 90 22 20 20 c8 99 22 | 57 69 6d 70 5f 53 65 6e |.." .."|Wimp_Sen|
|000028f0| 64 4d 65 73 73 61 67 65 | 22 2c 31 37 2c 42 75 67 |dMessage|",17,Bug|
|00002900| 25 0d 10 9a 05 cd 0d 10 | a4 05 e1 0d 10 ae 04 0d |%.......|........|
|00002910| 10 b8 29 dd a4 43 4f 28 | 50 25 29 3d 22 28 22 2b |..)..CO(|P%)="("+|
|00002920| c3 28 50 25 21 30 29 2b | 22 2c 22 2b c3 28 50 25 |.(P%!0)+|","+.(P%|
|00002930| 21 34 29 2b 22 29 20 22 | 0d 10 c2 11 dd a4 4e 28 |!4)+") "|......N(|
|00002940| 4e 25 29 3d c3 28 4e 25 | 29 0d 10 cc 12 dd a4 48 |N%)=.(N%|)......H|
|00002950| 28 4e 25 29 3d c3 7e 28 | 4e 25 29 0d 10 d6 13 dd |(N%)=.~(|N%).....|
|00002960| a4 4e 34 28 50 25 29 3d | c3 28 21 50 25 29 0d 10 |.N4(P%)=|.(!P%)..|
|00002970| e0 13 dd a4 4e 31 28 50 | 25 29 3d c3 28 3f 50 25 |....N1(P|%)=.(?P%|
|00002980| 29 0d 10 ea 05 20 0d 10 | f4 0f dd 20 f2 5f 52 65 |).... ..|... ._Re|
|00002990| 61 64 56 44 55 0d 10 fe | 16 de 20 69 6e 76 25 20 |adVDU...|.. inv% |
|000029a0| 32 37 2c 6f 75 74 76 25 | 20 32 33 0d 11 08 0e 69 |27,outv%| 23....i|
|000029b0| 6e 76 25 21 30 20 3d 20 | 34 0d 11 12 0e 69 6e 76 |nv%!0 = |4....inv|
|000029c0| 25 21 34 20 3d 20 35 0d | 11 1c 0e 69 6e 76 25 21 |%!4 = 5.|...inv%!|
|000029d0| 38 20 3d 20 36 0d 11 26 | 0e 69 6e 76 25 21 31 32 |8 = 6..&|.inv%!12|
|000029e0| 3d 20 37 0d 11 30 0f 69 | 6e 76 25 21 31 36 3d 20 |= 7..0.i|nv%!16= |
|000029f0| 31 31 0d 11 3a 0f 69 6e | 76 25 21 32 30 3d 20 31 |11..:.in|v%!20= 1|
|00002a00| 32 0d 11 44 0f 69 6e 76 | 25 21 32 34 3d 20 2d 31 |2..D.inv|%!24= -1|
|00002a10| 0d 11 4e 27 c8 99 20 22 | 4f 53 5f 52 65 61 64 56 |..N'.. "|OS_ReadV|
|00002a20| 64 75 56 61 72 69 61 62 | 6c 65 73 22 2c 69 6e 76 |duVariab|les",inv|
|00002a30| 25 2c 6f 75 74 76 25 0d | 11 58 14 64 78 25 3d 31 |%,outv%.|.X.dx%=1|
|00002a40| 3c 3c 28 6f 75 74 76 25 | 21 30 29 0d 11 62 14 64 |<<(outv%|!0)..b.d|
|00002a50| 79 25 3d 31 3c 3c 28 6f | 75 74 76 25 21 34 29 0d |y%=1<<(o|utv%!4).|
|00002a60| 11 6c 14 6c 69 6e 65 6c | 65 6e 25 3d 6f 75 74 76 |.l.linel|en%=outv|
|00002a70| 25 21 38 0d 11 76 18 73 | 63 72 65 65 6e 73 69 7a |%!8..v.s|creensiz|
|00002a80| 65 25 3d 6f 75 74 76 25 | 21 31 32 0d 11 80 1b 73 |e%=outv%|!12....s|
|00002a90| 63 72 78 31 25 3d 28 6f | 75 74 76 25 21 31 36 2b |crx1%=(o|utv%!16+|
|00002aa0| 31 29 2a 64 78 25 0d 11 | 8a 1b 73 63 72 79 31 25 |1)*dx%..|..scry1%|
|00002ab0| 3d 28 6f 75 74 76 25 21 | 32 30 2b 31 29 2a 64 79 |=(outv%!|20+1)*dy|
|00002ac0| 25 0d 11 94 05 e1 0d 11 | 9e 04 0d 11 a8 1d dd 20 |%.......|....... |
|00002ad0| f2 5f 43 68 61 6e 67 65 | 54 69 74 6c 65 42 61 72 |._Change|TitleBar|
|00002ae0| 28 57 25 2c 49 24 29 0d | 11 b2 25 21 71 25 3d 57 |(W%,I$).|..%!q%=W|
|00002af0| 25 3a c8 99 22 57 69 6d | 70 5f 47 65 74 57 69 6e |%:.."Wim|p_GetWin|
|00002b00| 64 6f 77 49 6e 66 6f 22 | 2c 2c 71 25 0d 11 bc 0f |dowInfo"|,,q%....|
|00002b10| 24 28 71 25 21 37 36 29 | 3d 49 24 0d 11 c6 28 21 |$(q%!76)|=I$...(!|
|00002b20| 71 25 3d 57 25 3a c8 99 | 22 57 69 6d 70 5f 47 65 |q%=W%:..|"Wimp_Ge|
|00002b30| 74 57 69 6e 64 6f 77 4f | 75 74 6c 69 6e 65 22 2c |tWindowO|utline",|
|00002b40| 2c 71 25 0d 11 d0 3a c8 | 99 22 57 69 6d 70 5f 46 |,q%...:.|."Wimp_F|
|00002b50| 6f 72 63 65 52 65 64 72 | 61 77 22 2c 2d 31 2c 71 |orceRedr|aw",-1,q|
|00002b60| 25 21 34 2c 20 20 28 71 | 25 21 31 36 29 2d 34 30 |%!4, (q|%!16)-40|
|00002b70| 20 2c 71 25 21 31 32 2c | 71 25 21 31 36 0d 11 da | ,q%!12,|q%!16...|
|00002b80| 05 e1 0d 11 e4 04 0d 11 | ee 1c dd 20 f2 5f 43 68 |........|... ._Ch|
|00002b90| 61 6e 67 65 49 63 6f 6e | 28 57 25 2c 49 25 2c 49 |angeIcon|(W%,I%,I|
|00002ba0| 24 29 0d 11 f8 2d 21 71 | 25 3d 57 25 3a 71 25 21 |$)...-!q|%=W%:q%!|
|00002bb0| 34 3d 49 25 3a c8 99 20 | 22 57 69 6d 70 5f 47 65 |4=I%:.. |"Wimp_Ge|
|00002bc0| 74 49 63 6f 6e 53 74 61 | 74 65 22 2c 2c 71 25 0d |tIconSta|te",,q%.|
|00002bd0| 12 02 47 24 28 71 25 21 | 32 38 29 3d 49 24 3a 21 |..G$(q%!|28)=I$:!|
|00002be0| 69 25 3d 57 25 3a 69 25 | 21 34 3d 49 25 3a 69 25 |i%=W%:i%|!4=I%:i%|
|00002bf0| 21 38 3d 30 3a 69 25 21 | 31 32 3d 30 3a c8 99 22 |!8=0:i%!|12=0:.."|
|00002c00| 57 69 6d 70 5f 53 65 74 | 49 63 6f 6e 53 74 61 74 |Wimp_Set|IconStat|
|00002c10| 65 22 2c 2c 69 25 0d 12 | 0c 05 e1 0d 12 16 04 0d |e",,i%..|........|
|00002c20| 12 20 17 dd 20 a4 5f 52 | 65 61 64 49 63 6f 6e 28 |. .. ._R|eadIcon(|
|00002c30| 57 25 2c 49 25 29 0d 12 | 2a 1a f4 20 46 6f 72 20 |W%,I%)..|*.. For |
|00002c40| 69 6e 64 69 72 65 63 74 | 65 64 20 49 43 4f 4e 53 |indirect|ed ICONS|
|00002c50| 0d 12 34 2d 21 71 25 3d | 57 25 3a 71 25 21 34 3d |..4-!q%=|W%:q%!4=|
|00002c60| 49 25 3a c8 99 20 22 57 | 69 6d 70 5f 47 65 74 49 |I%:.. "W|imp_GetI|
|00002c70| 63 6f 6e 53 74 61 74 65 | 22 2c 2c 71 25 0d 12 3e |conState|",,q%..>|
|00002c80| 0d 3d 24 28 71 25 21 32 | 38 29 0d 12 48 04 0d 12 |.=$(q%!2|8)..H...|
|00002c90| 52 2b f4 20 53 6d 6f 64 | 65 25 20 63 6f 6e 74 72 |R+. Smod|e% contr|
|00002ca0| 6f 6c 73 20 74 68 65 20 | 63 75 72 72 65 6e 74 20 |ols the |current |
|00002cb0| 73 63 61 6e 20 6d 6f 64 | 65 0d 12 5c 17 f4 20 30 |scan mod|e..\.. 0|
|00002cc0| 20 3d 20 73 63 61 6e 20 | 66 69 6e 69 73 68 65 64 | = scan |finished|
|00002cd0| 0d 12 66 20 f4 20 31 20 | 3d 20 66 61 73 74 20 73 |..f . 1 |= fast s|
|00002ce0| 63 61 6e 20 6f 66 20 61 | 6c 6c 20 6e 65 74 73 2e |can of a|ll nets.|
|00002cf0| 0d 12 70 04 0d 12 7a 0e | dd 20 f2 5f 44 6f 57 6f |..p...z.|. ._DoWo|
|00002d00| 72 6b 0d 12 84 0f c8 8e | 20 53 6d 6f 64 65 25 20 |rk......| Smode% |
|00002d10| ca 0d 12 8e 09 20 20 c9 | 20 30 0d 12 98 1f 20 20 |..... .| 0.... |
|00002d20| c9 20 31 20 3a 20 53 74 | 69 6d 65 25 3d 20 30 3a |. 1 : St|ime%= 0:|
|00002d30| f2 5f 53 63 61 6e 41 6c | 6c 0d 12 a2 1f 20 20 c9 |._ScanAl|l.... .|
|00002d40| 20 32 20 3a 20 53 74 69 | 6d 65 25 3d 35 30 3a f2 | 2 : Sti|me%=50:.|
|00002d50| 5f 53 63 61 6e 41 6c 6c | 0d 12 ac 0e f4 20 20 20 |_ScanAll|..... |
|00002d60| 57 48 45 4e 20 33 0d 12 | b6 05 cb 0d 12 c0 05 e1 |WHEN 3..|........|
|00002d70| 0d 12 ca 04 0d 12 d4 04 | 0d 12 de 0f dd 20 f2 5f |........|..... ._|
|00002d80| 53 63 61 6e 41 6c 6c 0d | 12 e8 0f 53 74 61 74 69 |ScanAll.|...Stati|
|00002d90| 6f 6e 25 2b 3d 31 0d 12 | f2 10 e7 20 4d 79 4e 65 |on%+=1..|... MyNe|
|00002da0| 74 25 3d 30 20 8c 0d 12 | fc 29 20 20 f4 20 4e 6f |t%=0 ...|.) . No|
|00002db0| 20 42 72 69 64 67 65 73 | 2e 20 20 53 74 6f 70 20 | Bridges|. Stop |
|00002dc0| 74 68 65 20 73 63 61 6e | 20 61 74 20 32 35 35 0d |the scan| at 255.|
|00002dd0| 13 06 16 20 20 e7 20 53 | 74 61 74 69 6f 6e 25 3d |... . S|tation%=|
|00002de0| 32 35 35 20 8c 0d 13 10 | 12 20 20 20 20 53 74 61 |255 ....|. Sta|
|00002df0| 74 69 6f 6e 25 3d 30 0d | 13 1a 10 20 20 20 20 53 |tion%=0.|... S|
|00002e00| 6d 6f 64 65 25 3d 32 0d | 13 24 07 20 20 cc 0d 13 |mode%=2.|.$. ...|
|00002e10| 2e 1f 20 20 20 20 f2 5f | 50 65 65 6b 28 4f 6e 4e |.. ._|Peek(OnN|
|00002e20| 65 74 25 2c 53 74 61 74 | 69 6f 6e 25 29 0d 13 38 |et%,Stat|ion%)..8|
|00002e30| 07 20 20 cd 0d 13 42 05 | cc 0d 13 4c 0f 20 20 f4 |. ...B.|...L. .|
|00002e40| 20 42 72 69 64 67 65 73 | 0d 13 56 16 20 20 e7 20 | Bridges|..V. . |
|00002e50| 53 74 61 74 69 6f 6e 25 | 3d 32 35 35 20 8c 0d 13 |Station%|=255 ...|
|00002e60| 60 1a 20 20 20 20 f4 20 | 46 69 6e 64 20 61 6e 6f |`. . |Find ano|
|00002e70| 74 68 65 72 20 6e 65 74 | 0d 13 6a 11 20 20 20 20 |ther net|..j. |
|00002e80| 4f 6e 4e 65 74 25 2b 3d | 31 0d 13 74 16 20 20 20 |OnNet%+=|1..t. |
|00002e90| 20 e7 20 4f 6e 4e 65 74 | 25 3c 31 32 38 20 8c 0d | . OnNet|%<128 ..|
|00002ea0| 13 7e 1d 20 20 20 20 20 | 20 e7 20 a4 5f 49 73 4e |.~. | . ._IsN|
|00002eb0| 65 74 28 4f 6e 4e 65 74 | 25 29 20 8c 0d 13 88 16 |et(OnNet|%) .....|
|00002ec0| 20 20 20 20 20 20 20 20 | 53 74 61 74 69 6f 6e 25 | |Station%|
|00002ed0| 3d 31 0d 13 92 23 20 20 | 20 20 20 20 20 20 f2 5f |=1...# | ._|
|00002ee0| 50 65 65 6b 28 4f 6e 4e | 65 74 25 2c 53 74 61 74 |Peek(OnN|et%,Stat|
|00002ef0| 69 6f 6e 25 29 0d 13 9c | 0b 20 20 20 20 20 20 cc |ion%)...|. .|
|00002f00| 0d 13 a6 32 20 20 20 20 | 20 20 20 20 53 74 61 74 |...2 | Stat|
|00002f10| 69 6f 6e 25 3d 32 35 34 | 3a f4 20 4e 65 78 74 20 |ion%=254|:. Next |
|00002f20| 74 69 6d 65 20 74 72 79 | 20 6e 65 78 74 20 6e 65 |time try| next ne|
|00002f30| 74 2e 0d 13 b0 17 20 20 | 20 20 20 20 20 20 f4 20 |t..... | . |
|00002f40| 4f 6e 4e 65 74 25 2b 3d | 31 0d 13 ba 0b 20 20 20 |OnNet%+=|1.... |
|00002f50| 20 20 20 cd 0d 13 c4 09 | 20 20 20 20 cc 0d 13 ce | .....| ....|
|00002f60| 2e 20 20 20 20 20 20 f4 | 20 4c 61 73 74 20 6e 65 |. .| Last ne|
|00002f70| 74 2e 20 20 45 6e 64 20 | 73 63 61 6e 20 67 6f 74 |t. End |scan got|
|00002f80| 6f 20 73 6c 6f 77 20 6d | 6f 64 65 0d 13 d8 12 20 |o slow m|ode.... |
|00002f90| 20 20 20 20 20 53 6d 6f | 64 65 25 3d 32 0d 13 e2 | Smo|de%=2...|
|00002fa0| 1d 20 20 20 20 20 20 4f | 6e 4e 65 74 25 3d 30 3a |. O|nNet%=0:|
|00002fb0| 53 74 61 74 69 6f 6e 25 | 3d 30 0d 13 ec 09 20 20 |Station%|=0.... |
|00002fc0| 20 20 cd 0d 13 f6 07 20 | 20 cc 0d 14 00 1f 20 20 | ..... | ..... |
|00002fd0| 20 20 f2 5f 50 65 65 6b | 28 4f 6e 4e 65 74 25 2c | ._Peek|(OnNet%,|
|00002fe0| 53 74 61 74 69 6f 6e 25 | 29 0d 14 0a 07 20 20 cd |Station%|).... .|
|00002ff0| 0d 14 14 05 cd 0d 14 1e | 05 e1 0d 14 28 04 0d 14 |........|....(...|
|00003000| 32 04 0d 14 3c 1d dd 20 | f2 5f 50 65 65 6b 28 4f |2...<.. |._Peek(O|
|00003010| 6e 4e 65 74 25 2c 53 74 | 61 74 69 6f 6e 25 29 0d |nNet%,St|ation%).|
|00003020| 14 46 60 f4 20 49 46 20 | 4d 79 4e 65 74 25 3d 4f |.F`. IF |MyNet%=O|
|00003030| 6e 4e 65 74 25 20 41 4e | 44 20 4d 79 53 74 61 74 |nNet% AN|D MyStat|
|00003040| 69 6f 6e 25 3d 53 74 61 | 74 69 6f 6e 25 20 50 52 |ion%=Sta|tion% PR|
|00003050| 4f 43 5f 41 64 64 53 74 | 61 74 69 6f 6e 28 4f 6e |OC_AddSt|ation(On|
|00003060| 4e 65 74 25 2c 53 74 61 | 74 69 6f 6e 25 2c 26 46 |Net%,Sta|tion%,&F|
|00003070| 46 46 46 30 30 30 37 2c | 32 35 35 2c 22 22 29 0d |FFF0007,|255,"").|
|00003080| 14 50 04 0d 14 5a 52 f4 | 20 49 46 20 53 74 61 74 |.P...ZR.| IF Stat|
|00003090| 69 6f 6e 25 3e 31 30 20 | 50 52 4f 43 5f 41 64 64 |ion%>10 |PROC_Add|
|000030a0| 53 74 61 74 69 6f 6e 28 | 52 4e 44 28 32 35 34 29 |Station(|RND(254)|
|000030b0| 2c 52 4e 44 28 32 35 34 | 29 2c 26 46 46 46 46 30 |,RND(254|),&FFFF0|
|000030c0| 30 30 30 2b 52 4e 44 28 | 31 30 29 2c 30 2c 22 4a |000+RND(|10),0,"J|
|000030d0| 75 6e 6b 22 29 0d 14 64 | 12 ea 20 52 30 25 2c 44 |unk")..d|.. R0%,D|
|000030e0| 25 2c 45 24 2c 51 25 0d | 14 6e 40 f4 20 49 6e 74 |%,E$,Q%.|.n@. Int|
|000030f0| 65 72 65 73 74 69 6e 67 | 20 61 73 73 75 6d 70 74 |eresting| assumpt|
|00003100| 69 6f 6e 20 74 68 61 74 | 20 74 68 69 73 20 6d 61 |ion that| this ma|
|00003110| 63 68 69 6e 65 20 69 73 | 20 61 6e 20 61 72 63 68 |chine is| an arch|
|00003120| 69 6d 65 64 65 73 2e 0d | 14 78 04 0d 14 82 33 f4 |imedes..|.x....3.|
|00003130| 20 49 46 20 4d 79 4e 65 | 74 25 3d 4f 6e 4e 65 74 | IF MyNe|t%=OnNet|
|00003140| 25 20 41 4e 44 20 4d 79 | 53 74 61 74 69 6f 6e 25 |% AND My|Station%|
|00003150| 3d 53 74 61 74 69 6f 6e | 25 20 54 48 45 4e 0d 14 |=Station|% THEN..|
|00003160| 8c 26 e7 20 4f 6e 4e 65 | 74 25 3d 30 20 80 20 4d |.&. OnNe|t%=0 . M|
|00003170| 79 53 74 61 74 69 6f 6e | 25 3d 53 74 61 74 69 6f |yStation|%=Statio|
|00003180| 6e 25 20 8c 0d 14 96 34 | 20 20 f2 5f 41 64 64 53 |n% ....4| ._AddS|
|00003190| 74 61 74 69 6f 6e 28 4f | 6e 4e 65 74 25 2c 53 74 |tation(O|nNet%,St|
|000031a0| 61 74 69 6f 6e 25 2c 26 | 46 46 46 46 30 30 30 37 |ation%,&|FFFF0007|
|000031b0| 2c 32 35 35 2c 22 22 29 | 0d 14 a0 05 cc 0d 14 aa |,255,"")|........|
|000031c0| 45 20 20 c8 99 22 45 63 | 6f 6e 65 74 5f 44 6f 49 |E .."Ec|onet_DoI|
|000031d0| 6d 6d 65 64 69 61 74 65 | 22 2c 38 2c 2c 53 74 61 |mmediate|",8,,Sta|
|000031e0| 74 69 6f 6e 25 2c 4f 6e | 4e 65 74 25 2c 62 75 66 |tion%,On|Net%,buf|
|000031f0| 66 65 72 25 2c 31 30 30 | 2c 31 2c 35 20 b8 20 52 |fer%,100|,1,5 . R|
|00003200| 30 25 0d 14 b4 0f 20 20 | e7 20 52 30 25 3d 30 20 |0%.... |. R0%=0 |
|00003210| 8c 0d 14 be 13 20 20 20 | 20 44 25 3d 21 62 75 66 |..... | D%=!buf|
|00003220| 66 65 72 25 0d 14 c8 27 | 20 20 20 20 51 25 3d a4 |fer%...'| Q%=.|
|00003230| 5f 49 73 50 72 69 6e 74 | 65 72 28 4f 6e 4e 65 74 |_IsPrint|er(OnNet|
|00003240| 25 2c 53 74 61 74 69 6f | 6e 25 29 0d 14 d2 11 20 |%,Statio|n%).... |
|00003250| 20 20 20 e7 20 51 25 3d | 2d 31 20 8c 0d 14 dc 16 | . Q%=|-1 .....|
|00003260| 20 20 20 20 20 20 45 24 | 3d 22 20 20 20 20 20 20 | E$|=" |
|00003270| 20 22 0d 14 e6 09 20 20 | 20 20 cc 0d 14 f0 2b 20 | ".... | ....+ |
|00003280| 20 20 20 20 20 45 24 3d | a4 5f 50 72 69 6e 74 65 | E$=|._Printe|
|00003290| 72 4e 61 6d 65 28 4f 6e | 4e 65 74 25 2c 53 74 61 |rName(On|Net%,Sta|
|000032a0| 74 69 6f 6e 25 29 0d 14 | fa 09 20 20 20 20 cd 0d |tion%)..|.. ..|
|000032b0| 15 04 2b 20 20 20 20 45 | 24 2b 3d a4 5f 49 73 46 |..+ E|$+=._IsF|
|000032c0| 69 6c 65 73 65 72 76 65 | 72 28 4f 6e 4e 65 74 25 |ileserve|r(OnNet%|
|000032d0| 2c 53 74 61 74 69 6f 6e | 25 29 0d 15 0e 2e 20 20 |,Station|%).... |
|000032e0| 20 20 f2 5f 41 64 64 53 | 74 61 74 69 6f 6e 28 4f | ._AddS|tation(O|
|000032f0| 6e 4e 65 74 25 2c 53 74 | 61 74 69 6f 6e 25 2c 44 |nNet%,St|ation%,D|
|00003300| 25 2c 51 25 2c 45 24 29 | 0d 15 18 07 20 20 cc 0d |%,Q%,E$)|.... ..|
|00003310| 15 22 2b 20 20 20 20 f4 | 20 54 65 73 74 20 69 66 |."+ .| Test if|
|00003320| 20 74 68 65 20 73 74 61 | 74 69 6f 6e 20 68 61 73 | the sta|tion has|
|00003330| 20 67 6f 6e 65 20 61 77 | 61 79 0d 15 2c 24 20 20 | gone aw|ay..,$ |
|00003340| 20 20 49 63 25 3d a4 5f | 4b 6e 6f 77 6e 28 4f 6e | Ic%=._|Known(On|
|00003350| 4e 65 74 25 2c 53 74 61 | 74 69 6f 6e 25 29 0d 15 |Net%,Sta|tion%)..|
|00003360| 36 13 20 20 20 20 e7 20 | 49 63 25 3c 3e 2d 31 20 |6. . |Ic%<>-1 |
|00003370| 8c 0d 15 40 21 20 20 20 | 20 20 20 e7 20 3f 28 32 |...@! | . ?(2|
|00003380| 2b 42 61 73 65 25 2b 34 | 30 2a 49 63 25 29 3d 30 |+Base%+4|0*Ic%)=0|
|00003390| 20 8c 0d 15 4a 1f 20 20 | 20 20 20 20 20 20 3f 28 | ...J. | ?(|
|000033a0| 32 2b 42 61 73 65 25 2b | 34 30 2a 49 63 25 29 3d |2+Base%+|40*Ic%)=|
|000033b0| 31 0d 15 54 1b 20 20 20 | 20 20 20 20 20 f2 5f 46 |1..T. | ._F|
|000033c0| 6f 72 6d 61 74 44 69 73 | 70 6c 61 79 0d 15 5e 0b |ormatDis|play..^.|
|000033d0| 20 20 20 20 20 20 cd 0d | 15 68 09 20 20 20 20 cd | ..|.h. .|
|000033e0| 0d 15 72 07 20 20 cd 0d | 15 7c 05 cd 0d 15 86 05 |..r. ..|.|......|
|000033f0| e1 0d 15 90 04 0d 15 9a | 04 0d 15 a4 11 dd 20 a4 |........|...... .|
|00003400| 5f 49 6e 66 6f 53 28 41 | 25 29 0d 15 ae 25 f4 20 |_InfoS(A|%)...%. |
|00003410| 45 24 3d 46 4e 5f 50 72 | 69 6e 74 65 72 28 41 25 |E$=FN_Pr|inter(A%|
|00003420| 3f 33 29 2b 22 20 22 2b | 24 28 41 25 2b 38 29 0d |?3)+" "+|$(A%+8).|
|00003430| 15 b8 32 45 24 3d c0 24 | 28 41 25 2b 38 29 2c 37 |..2E$=.$|(A%+8),7|
|00003440| 29 2b a4 5f 50 72 69 6e | 74 65 72 28 41 25 3f 33 |)+._Prin|ter(A%?3|
|00003450| 29 2b 22 20 22 2b c1 24 | 28 41 25 2b 38 29 2c 38 |)+" "+.$|(A%+8),8|
|00003460| 29 0d 15 c2 0e 45 24 3d | c0 45 24 2c 33 35 29 0d |)....E$=|.E$,35).|
|00003470| 15 cc 16 45 24 3d 45 24 | 2b c4 33 35 2d a9 45 24 |...E$=E$|+.35-.E$|
|00003480| 2c 22 20 22 29 0d 15 d6 | 07 3d 45 24 0d 15 e0 04 |," ")...|.=E$....|
|00003490| 0d 15 ea 14 dd 20 a4 5f | 4b 6e 6f 77 6e 28 4e 25 |..... ._|Known(N%|
|000034a0| 2c 53 25 29 0d 15 f4 0b | ea 20 43 25 2c 51 25 0d |,S%)....|. C%,Q%.|
|000034b0| 15 fe 10 4e 25 3d 53 25 | 2b 32 35 36 2a 4e 25 0d |...N%=S%|+256*N%.|
|000034c0| 16 08 09 51 25 3d 2d 31 | 0d 16 12 2b e3 20 43 25 |...Q%=-1|...+. C%|
|000034d0| 3d 42 61 73 65 25 20 b8 | 20 42 61 73 65 25 2b 28 |=Base% .| Base%+(|
|000034e0| 34 30 2a 28 69 74 65 6d | 73 25 2d 31 29 29 20 88 |40*(item|s%-1)) .|
|000034f0| 20 34 30 0d 16 1c 41 e7 | 20 28 26 46 46 46 46 20 | 40...A.| (&FFFF |
|00003500| 80 21 43 25 29 3d 4e 25 | 20 8c 20 51 25 3d 28 43 |.!C%)=N%| . Q%=(C|
|00003510| 25 2d 42 61 73 65 25 29 | 81 34 30 3a 43 25 3d 42 |%-Base%)|.40:C%=B|
|00003520| 61 73 65 25 2b 28 34 30 | 2a 28 69 74 65 6d 73 25 |ase%+(40|*(items%|
|00003530| 2d 31 29 29 0d 16 26 05 | ed 0d 16 30 07 3d 51 25 |-1))..&.|...0.=Q%|
|00003540| 0d 16 3a 04 0d 16 44 04 | 0d 16 4e 13 dd 20 a4 5f |..:...D.|..N.. ._|
|00003550| 4d 61 63 68 69 6e 65 28 | 44 25 29 0d 16 58 0e ea |Machine(|D%)..X..|
|00003560| 20 56 24 2c 57 24 2c 4d | 24 0d 16 62 20 e7 20 28 | V$,W$,M|$..b . (|
|00003570| 44 25 80 26 46 46 46 46 | 30 30 30 30 29 3d 26 46 |D%.&FFFF|0000)=&F|
|00003580| 46 46 46 30 30 30 30 20 | 8c 0d 16 6c 23 20 f4 20 |FFF0000 |...l# . |
|00003590| 20 20 56 24 3d 22 3f 3f | 2e 3f 3f 20 20 28 54 68 | V$="??|.?? (Th|
|000035a0| 69 73 20 6d 61 63 68 69 | 6e 65 29 22 0d 16 76 10 |is machi|ne)"..v.|
|000035b0| 20 20 56 24 3d 22 3f 3f | 2e 3f 3f 22 0d 16 80 05 | V$="??|.??"....|
|000035c0| cc 0d 16 8a 18 20 20 56 | 24 3d c3 7e 28 44 25 81 |..... V|$=.~(D%.|
|000035d0| 26 31 30 30 30 30 30 30 | 29 0d 16 94 1c 20 20 57 |&1000000|).... W|
|000035e0| 24 3d c3 7e 28 28 44 25 | 81 26 31 30 30 30 30 29 |$=.~((D%|.&10000)|
|000035f0| 80 26 46 46 29 0d 16 9e | 19 20 20 e7 20 a9 57 24 |.&FF)...|. . .W$|
|00003600| 3d 31 20 8c 20 57 24 3d | 22 30 22 2b 57 24 0d 16 |=1 . W$=|"0"+W$..|
|00003610| a8 2f 20 20 e7 20 a9 56 | 24 3d 31 20 8c 20 56 24 |./ . .V|$=1 . V$|
|00003620| 3d 22 20 22 2b 56 24 2b | 22 2e 22 2b 57 24 20 8b |=" "+V$+|"."+W$ .|
|00003630| 20 56 24 3d 56 24 2b 22 | 2e 22 2b 57 24 0d 16 b2 | V$=V$+"|."+W$...|
|00003640| 05 cd 0d 16 bc 04 0d 16 | c6 0f 44 25 3d 44 25 80 |........|..D%=D%.|
|00003650| 26 46 46 46 46 0d 16 d0 | 0d e7 20 44 25 3c 31 36 |&FFFF...|.. D%<16|
|00003660| 20 8c 0d 16 da 0f 20 20 | 4d 24 3d 4d 24 28 44 25 | ..... |M$=M$(D%|
|00003670| 29 0d 16 e4 05 cc 0d 16 | ee 26 20 20 e7 20 44 25 |).......|.& . D%|
|00003680| 3d 26 46 46 46 41 20 8c | 20 4d 24 3d 22 53 43 53 |=&FFFA .| M$="SCS|
|00003690| 49 20 49 6e 74 65 72 66 | 61 63 65 22 0d 16 f8 26 |I Interf|ace"...&|
|000036a0| 20 20 e7 20 44 25 3d 26 | 46 46 46 42 20 8c 20 4d | . D%=&|FFFB . M|
|000036b0| 24 3d 22 53 4a 20 50 43 | 20 61 64 61 70 74 6f 72 |$="SJ PC| adaptor|
|000036c0| 20 22 0d 17 02 26 20 20 | e7 20 44 25 3d 26 46 46 | "...& |. D%=&FF|
|000036d0| 46 43 20 8c 20 4d 24 3d | 22 4e 61 73 63 6f 6d 20 |FC . M$=|"Nascom |
|000036e0| 32 20 20 20 20 20 20 22 | 0d 17 0c 26 20 20 e7 20 |2 "|...& . |
|000036f0| 44 25 3d 26 46 46 46 44 | 20 8c 20 4d 24 3d 22 52 |D%=&FFFD| . M$="R|
|00003700| 4d 20 34 38 30 5a 20 20 | 20 20 20 20 20 22 0d 17 |M 480Z | "..|
|00003710| 16 26 20 20 e7 20 44 25 | 3d 26 46 46 46 45 20 8c |.& . D%|=&FFFE .|
|00003720| 20 4d 24 3d 22 53 4a 20 | 46 69 6c 65 73 65 72 76 | M$="SJ |Fileserv|
|00003730| 65 72 20 22 0d 17 20 26 | 20 20 e7 20 44 25 3d 26 |er ".. &| . D%=&|
|00003740| 46 46 46 46 20 8c 20 4d | 24 3d 22 5a 38 30 20 43 |FFFF . M|$="Z80 C|
|00003750| 50 4d 20 20 20 20 20 20 | 20 22 0d 17 2a 05 cd 0d |PM | "..*...|
|00003760| 17 34 13 3d 4d 24 2b 22 | 20 56 65 72 2e 20 22 2b |.4.=M$+"| Ver. "+|
|00003770| 56 24 0d 17 3e 04 0d 17 | 48 04 0d 17 52 15 dd 20 |V$..>...|H...R.. |
|00003780| f2 5f 43 68 65 63 6b 28 | 43 68 65 63 6b 25 29 0d |._Check(|Check%).|
|00003790| 17 5c 12 e7 20 43 68 65 | 63 6b 25 3d 30 20 8c 20 |.\.. Che|ck%=0 . |
|000037a0| e1 0d 17 66 0b ea 20 4e | 25 2c 53 25 0d 17 70 25 |...f.. N|%,S%..p%|
|000037b0| f4 20 53 25 3d 46 4e 5f | 4e 65 74 4e 75 6d 62 65 |. S%=FN_|NetNumbe|
|000037c0| 72 28 4d 49 44 24 28 43 | 68 65 63 6b 24 2c 36 29 |r(MID$(C|heck$,6)|
|000037d0| 29 0d 17 7a 1f 4e 25 3d | 43 68 65 63 6b 25 81 32 |)..z.N%=|Check%.2|
|000037e0| 35 36 3a 53 25 3d 43 68 | 65 63 6b 25 83 32 35 36 |56:S%=Ch|eck%.256|
|000037f0| 0d 17 84 11 f2 5f 50 65 | 65 6b 28 4e 25 2c 53 25 |....._Pe|ek(N%,S%|
|00003800| 29 0d 17 8e 05 e1 0d 17 | 98 04 0d 17 a2 25 dd 20 |).......|.....%. |
|00003810| a4 5f 4e 65 74 28 41 25 | 29 3d a4 5f 4e 65 74 53 |._Net(A%|)=._NetS|
|00003820| 74 72 69 6e 67 28 41 25 | 3f 31 2c 3f 41 25 29 0d |tring(A%|?1,?A%).|
|00003830| 17 ac 04 0d 17 b6 39 dd | 20 a4 5f 4e 65 74 53 74 |......9.| ._NetSt|
|00003840| 72 69 6e 67 28 4e 25 2c | 53 25 29 3a e7 20 4e 25 |ring(N%,|S%):. N%|
|00003850| 3d 30 20 8c 3d c3 28 53 | 25 29 20 8b 3d c3 28 4e |=0 .=.(S|%) .=.(N|
|00003860| 25 29 2b 22 2e 22 2b c3 | 28 53 25 29 0d 17 c0 04 |%)+"."+.|(S%)....|
|00003870| 0d 17 ca 15 dd 20 a4 5f | 4e 65 74 4e 75 6d 62 65 |..... ._|NetNumbe|
|00003880| 72 28 4e 24 29 0d 17 d4 | 0b ea 20 50 25 2c 52 25 |r(N$)...|.. P%,R%|
|00003890| 0d 17 de 0f 50 25 3d a7 | 4e 24 2c 22 2e 22 29 0d |....P%=.|N$,".").|
|000038a0| 17 e8 0c e7 20 50 25 3d | 30 20 8c 0d 17 f2 0e 20 |.... P%=|0 ..... |
|000038b0| 20 52 25 3d bb 28 4e 24 | 29 0d 17 fc 05 cc 0d 18 | R%=.(N$|).......|
|000038c0| 06 21 20 20 52 25 3d bb | c0 4e 24 2c 50 25 29 2a |.! R%=.|.N$,P%)*|
|000038d0| 26 31 30 30 2b bb c1 4e | 24 2c 50 25 2b 31 29 0d |&100+..N|$,P%+1).|
|000038e0| 18 10 05 cd 0d 18 1a 07 | 3d 52 25 0d 18 24 04 0d |........|=R%..$..|
|000038f0| 18 2e 11 dd 20 a4 5f 49 | 73 4e 65 74 28 4e 25 29 |.... ._I|sNet(N%)|
|00003900| 0d 18 38 11 ea 20 50 25 | 2c 52 25 2c 48 25 2c 53 |..8.. P%|,R%,H%,S|
|00003910| 25 0d 18 42 20 c8 99 22 | 45 63 6f 6e 65 74 5f 41 |%..B .."|Econet_A|
|00003920| 6c 6c 6f 63 61 74 65 50 | 6f 72 74 22 20 b8 20 50 |llocateP|ort" . P|
|00003930| 25 0d 18 4c 31 c8 99 22 | 45 63 6f 6e 65 74 5f 43 |%..L1.."|Econet_C|
|00003940| 72 65 61 74 65 52 65 63 | 65 69 76 65 22 2c 50 25 |reateRec|eive",P%|
|00003950| 2c 30 2c 30 2c 52 58 42 | 46 25 2c 31 30 20 b8 20 |,0,0,RXB|F%,10 . |
|00003960| 48 25 0d 18 56 30 24 28 | 52 58 42 46 25 2b 35 30 |H%..V0$(|RXBF%+50|
|00003970| 29 3d 22 42 72 69 64 67 | 65 22 3a 52 58 42 46 25 |)="Bridg|e":RXBF%|
|00003980| 3f 35 36 3d 50 25 3a 52 | 58 42 46 25 3f 35 37 3d |?56=P%:R|XBF%?57=|
|00003990| 4e 25 0d 18 60 38 c8 99 | 22 45 63 6f 6e 65 74 5f |N%..`8..|"Econet_|
|000039a0| 44 6f 54 72 61 6e 73 6d | 69 74 22 2c 26 38 33 2c |DoTransm|it",&83,|
|000039b0| 26 39 43 2c 26 46 46 2c | 26 46 46 2c 52 58 42 46 |&9C,&FF,|&FF,RXBF|
|000039c0| 25 2b 35 30 2c 38 2c 32 | 2c 33 0d 18 6a 2a c8 99 |%+50,8,2|,3..j*..|
|000039d0| 22 45 63 6f 6e 65 74 5f | 57 61 69 74 46 6f 72 52 |"Econet_|WaitForR|
|000039e0| 65 63 65 70 74 69 6f 6e | 22 2c 48 25 2c 31 30 20 |eception|",H%,10 |
|000039f0| b8 20 53 25 0d 18 74 20 | c8 99 22 45 63 6f 6e 65 |. S%..t |.."Econe|
|00003a00| 74 5f 44 65 41 6c 6c 6f | 63 61 74 65 50 6f 72 74 |t_DeAllo|catePort|
|00003a10| 22 2c 50 25 0d 18 7e 09 | 3d 53 25 3d 39 0d 18 88 |",P%..~.|=S%=9...|
|00003a20| 04 0d 18 92 18 dd 20 a4 | 5f 49 73 50 72 69 6e 74 |...... .|_IsPrint|
|00003a30| 65 72 28 4e 25 2c 53 25 | 29 0d 18 9c 3a f4 20 54 |er(N%,S%|)...:. T|
|00003a40| 65 73 74 20 69 66 20 61 | 20 73 74 61 74 69 6f 6e |est if a| station|
|00003a50| 20 73 75 70 70 6f 72 74 | 73 20 70 72 69 6e 74 65 | support|s printe|
|00003a60| 72 20 73 65 72 76 65 72 | 20 70 72 6f 74 6f 63 6f |r server| protoco|
|00003a70| 6c 73 2e 0d 18 a6 3c f4 | 20 52 65 74 75 72 6e 73 |ls....<.| Returns|
|00003a80| 20 2d 31 20 69 66 20 6e | 6f 74 20 6f 74 68 65 72 | -1 if n|ot other|
|00003a90| 20 77 69 73 65 20 30 2d | 66 72 65 65 2c 31 20 62 | wise 0-|free,1 b|
|00003aa0| 75 73 73 79 2c 20 32 20 | 6a 61 6d 6d 65 64 2e 0d |ussy, 2 |jammed..|
|00003ab0| 18 b0 40 f4 20 53 68 6f | 75 6c 64 20 62 65 20 65 |..@. Sho|uld be e|
|00003ac0| 78 74 65 6e 64 65 64 20 | 74 6f 20 63 6f 70 65 20 |xtended |to cope |
|00003ad0| 77 69 74 68 20 53 4a 20 | 70 72 69 6e 74 65 72 20 |with SJ |printer |
|00003ae0| 73 65 72 76 65 72 20 65 | 78 74 65 6e 64 65 64 0d |server e|xtended.|
|00003af0| 18 ba 18 f4 20 73 74 61 | 74 65 20 69 6e 66 6f 72 |.... sta|te infor|
|00003b00| 6d 61 74 69 6f 6e 2e 0d | 18 c4 11 ea 20 50 25 2c |mation..|.... P%,|
|00003b10| 52 25 2c 48 25 2c 52 24 | 0d 18 ce 34 c8 99 22 45 |R%,H%,R$|...4.."E|
|00003b20| 63 6f 6e 65 74 5f 43 72 | 65 61 74 65 52 65 63 65 |conet_Cr|eateRece|
|00003b30| 69 76 65 22 2c 26 39 45 | 2c 53 25 2c 4e 25 2c 52 |ive",&9E|,S%,N%,R|
|00003b40| 58 42 46 25 2c 31 30 20 | b8 20 48 25 0d 18 d8 2f |XBF%,10 |. H%.../|
|00003b50| 24 28 52 58 42 46 25 2b | 35 30 29 3d 22 50 52 49 |$(RXBF%+|50)="PRI|
|00003b60| 4e 54 20 22 3a 52 58 42 | 46 25 3f 35 36 3d 30 31 |NT ":RXB|F%?56=01|
|00003b70| 3a 52 58 42 46 25 3f 35 | 37 3d 30 0d 18 e2 36 c8 |:RXBF%?5|7=0...6.|
|00003b80| 99 22 45 63 6f 6e 65 74 | 5f 44 6f 54 72 61 6e 73 |."Econet|_DoTrans|
|00003b90| 6d 69 74 22 2c 26 38 30 | 2c 26 39 46 2c 53 25 2c |mit",&80|,&9F,S%,|
|00003ba0| 4e 25 2c 52 58 42 46 25 | 2b 35 30 2c 38 2c 32 2c |N%,RXBF%|+50,8,2,|
|00003bb0| 33 0d 18 ec 2a c8 99 22 | 45 63 6f 6e 65 74 5f 57 |3...*.."|Econet_W|
|00003bc0| 61 69 74 46 6f 72 52 65 | 63 65 70 74 69 6f 6e 22 |aitForRe|ception"|
|00003bd0| 2c 48 25 2c 32 35 20 b8 | 20 53 25 0d 18 f6 1e e7 |,H%,25 .| S%.....|
|00003be0| 20 53 25 3d 39 20 8c 20 | 53 25 3d 3f 52 58 42 46 | S%=9 . |S%=?RXBF|
|00003bf0| 25 20 8b 20 53 25 3d 2d | 31 0d 19 00 07 3d 53 25 |% . S%=-|1....=S%|
|00003c00| 0d 19 0a 04 0d 19 14 13 | dd 20 a4 5f 50 72 69 6e |........|. ._Prin|
|00003c10| 74 65 72 28 53 25 29 0d | 19 1e 0b c8 8e 20 53 25 |ter(S%).|..... S%|
|00003c20| 20 ca 0d 19 28 1b 20 20 | c9 20 32 35 35 3a 20 20 | ...(. |. 255: |
|00003c30| 52 24 3d 22 20 20 20 20 | 20 20 20 20 22 0d 19 32 |R$=" | "..2|
|00003c40| 1b 20 20 c9 20 20 20 30 | 3a 20 20 52 24 3d 22 20 |. . 0|: R$=" |
|00003c50| 69 64 6c 65 2e 20 20 22 | 0d 19 3c 1b 20 20 c9 20 |idle. "|..<. . |
|00003c60| 20 20 31 3a 20 20 52 24 | 3d 22 20 62 75 73 79 2e | 1: R$|=" busy.|
|00003c70| 20 20 22 0d 19 46 1b 20 | 20 c9 20 20 20 32 3a 20 | "..F. | . 2: |
|00003c80| 20 52 24 3d 22 20 6a 61 | 6d 6d 65 64 2e 22 0d 19 | R$=" ja|mmed."..|
|00003c90| 50 16 20 20 7f 20 20 52 | 24 3d 22 20 3f 3f 3f 3f |P. . R|$=" ????|
|00003ca0| 3f 3f 2e 22 0d 19 5a 05 | cb 0d 19 64 07 3d 52 24 |??."..Z.|...d.=R$|
|00003cb0| 0d 19 6e 04 0d 19 78 1a | dd 20 a4 5f 50 72 69 6e |..n...x.|. ._Prin|
|00003cc0| 74 65 72 4e 61 6d 65 28 | 4e 25 2c 53 25 29 0d 19 |terName(|N%,S%)..|
|00003cd0| 82 1e f4 20 41 73 6b 20 | 74 68 65 20 70 72 69 6e |... Ask |the prin|
|00003ce0| 74 65 72 20 69 74 73 20 | 6e 61 6d 65 0d 19 8c 34 |ter its |name...4|
|00003cf0| f4 20 41 73 73 75 6d 69 | 6e 67 20 77 65 20 6b 6e |. Assumi|ng we kn|
|00003d00| 6f 77 20 61 20 70 72 69 | 6e 74 65 72 20 69 73 20 |ow a pri|nter is |
|00003d10| 61 74 20 74 68 69 73 20 | 61 64 64 72 65 73 73 2e |at this |address.|
|00003d20| 0d 19 96 3f f4 20 49 66 | 20 74 68 65 20 70 72 69 |...?. If| the pri|
|00003d30| 6e 74 65 72 20 64 6f 65 | 73 20 6e 6f 74 20 73 75 |nter doe|s not su|
|00003d40| 70 70 6f 72 74 20 74 68 | 69 73 20 70 72 6f 74 6f |pport th|is proto|
|00003d50| 63 6f 6c 20 74 68 65 6e | 20 72 65 74 75 72 6e 0d |col then| return.|
|00003d60| 19 a0 10 f4 20 27 50 72 | 69 6e 74 65 72 27 2e 0d |.... 'Pr|inter'..|
|00003d70| 19 aa 11 ea 20 50 25 2c | 52 25 2c 48 25 2c 52 24 |.... P%,|R%,H%,R$|
|00003d80| 0d 19 b4 34 c8 99 22 45 | 63 6f 6e 65 74 5f 43 72 |...4.."E|conet_Cr|
|00003d90| 65 61 74 65 52 65 63 65 | 69 76 65 22 2c 26 39 45 |eateRece|ive",&9E|
|00003da0| 2c 53 25 2c 4e 25 2c 52 | 58 42 46 25 2c 31 30 20 |,S%,N%,R|XBF%,10 |
|00003db0| b8 20 48 25 0d 19 be 2f | 24 28 52 58 42 46 25 2b |. H%.../|$(RXBF%+|
|00003dc0| 35 30 29 3d 22 50 52 49 | 4e 54 20 22 3a 52 58 42 |50)="PRI|NT ":RXB|
|00003dd0| 46 25 3f 35 36 3d 30 36 | 3a 52 58 42 46 25 3f 35 |F%?56=06|:RXBF%?5|
|00003de0| 37 3d 30 0d 19 c8 36 c8 | 99 22 45 63 6f 6e 65 74 |7=0...6.|."Econet|
|00003df0| 5f 44 6f 54 72 61 6e 73 | 6d 69 74 22 2c 26 38 30 |_DoTrans|mit",&80|
|00003e00| 2c 26 39 46 2c 53 25 2c | 4e 25 2c 52 58 42 46 25 |,&9F,S%,|N%,RXBF%|
|00003e10| 2b 35 30 2c 38 2c 32 2c | 33 0d 19 d2 2a c8 99 22 |+50,8,2,|3...*.."|
|00003e20| 45 63 6f 6e 65 74 5f 57 | 61 69 74 46 6f 72 52 65 |Econet_W|aitForRe|
|00003e30| 63 65 70 74 69 6f 6e 22 | 2c 48 25 2c 32 35 20 b8 |ception"|,H%,25 .|
|00003e40| 20 53 25 0d 19 dc 0c e7 | 20 53 25 3d 39 20 8c 0d | S%.....| S%=9 ..|
|00003e50| 19 e6 1a 20 20 e3 20 53 | 25 3d 52 58 42 46 25 20 |... . S|%=RXBF% |
|00003e60| b8 20 52 58 42 46 25 2b | 35 0d 19 f0 25 20 20 20 |. RXBF%+|5...% |
|00003e70| 20 e7 20 3f 53 25 3e 33 | 31 20 80 20 3f 53 25 3c | . ?S%>3|1 . ?S%<|
|00003e80| 31 32 37 20 8c 20 52 24 | 2b 3d bd 3f 53 25 0d 19 |127 . R$|+=.?S%..|
|00003e90| fa 07 20 20 ed 0d 1a 04 | 19 20 20 52 24 3d c0 52 |.. ....|. R$=.R|
|00003ea0| 24 2b 22 20 20 20 20 20 | 20 20 22 2c 37 29 0d 1a |$+" | ",7)..|
|00003eb0| 0e 05 cc 0d 1a 18 12 20 | 20 52 24 3d 22 50 72 69 |....... | R$="Pri|
|00003ec0| 6e 74 65 72 22 0d 1a 22 | 05 cd 0d 1a 2c 07 3d 52 |nter".."|....,.=R|
|00003ed0| 24 0d 1a 36 04 0d 1a 40 | 1b dd 20 a4 5f 49 73 46 |$..6...@|.. ._IsF|
|00003ee0| 69 6c 65 73 65 72 76 65 | 72 28 4e 25 2c 53 25 29 |ileserve|r(N%,S%)|
|00003ef0| 0d 1a 4a 3d f4 20 54 65 | 73 74 20 69 66 20 61 20 |..J=. Te|st if a |
|00003f00| 73 74 61 74 69 6f 6e 20 | 73 75 70 70 6f 72 74 73 |station |supports|
|00003f10| 20 66 69 6c 65 73 65 72 | 76 65 72 20 73 65 72 76 | fileser|ver serv|
|00003f20| 65 72 20 70 72 6f 74 6f | 63 6f 6c 73 2e 0d 1a 54 |er proto|cols...T|
|00003f30| 33 f4 20 52 65 74 75 72 | 6e 73 20 61 20 76 65 72 |3. Retur|ns a ver|
|00003f40| 73 69 6f 6e 20 6e 75 6d | 62 65 72 20 73 74 72 69 |sion num|ber stri|
|00003f50| 6e 67 20 6f 66 20 22 22 | 20 69 66 20 6e 6f 6e 65 |ng of ""| if none|
|00003f60| 0d 1a 5e 11 ea 20 50 25 | 2c 52 25 2c 48 25 2c 52 |..^.. P%|,R%,H%,R|
|00003f70| 24 0d 1a 68 20 c8 99 22 | 45 63 6f 6e 65 74 5f 41 |$..h .."|Econet_A|
|00003f80| 6c 6c 6f 63 61 74 65 50 | 6f 72 74 22 20 b8 20 50 |llocateP|ort" . P|
|00003f90| 25 0d 1a 72 33 c8 99 22 | 45 63 6f 6e 65 74 5f 43 |%..r3.."|Econet_C|
|00003fa0| 72 65 61 74 65 52 65 63 | 65 69 76 65 22 2c 50 25 |reateRec|eive",P%|
|00003fb0| 2c 53 25 2c 4e 25 2c 52 | 58 42 46 25 2c 34 35 20 |,S%,N%,R|XBF%,45 |
|00003fc0| b8 20 48 25 0d 1a 7c 26 | 52 58 42 46 25 3f 35 30 |. H%..|&|RXBF%?50|
|00003fd0| 3d 50 25 3a 52 58 42 46 | 25 3f 35 31 3d 32 35 3a |=P%:RXBF|%?51=25:|
|00003fe0| 52 58 42 46 25 21 35 32 | 3d 30 0d 1a 86 36 c8 99 |RXBF%!52|=0...6..|
|00003ff0| 22 45 63 6f 6e 65 74 5f | 44 6f 54 72 61 6e 73 6d |"Econet_|DoTransm|
|00004000| 69 74 22 2c 26 38 30 2c | 26 39 39 2c 53 25 2c 4e |it",&80,|&99,S%,N|
|00004010| 25 2c 52 58 42 46 25 2b | 35 30 2c 35 2c 32 2c 33 |%,RXBF%+|50,5,2,3|
|00004020| 0d 1a 90 2a c8 99 22 45 | 63 6f 6e 65 74 5f 57 61 |...*.."E|conet_Wa|
|00004030| 69 74 46 6f 72 52 65 63 | 65 70 74 69 6f 6e 22 2c |itForRec|eption",|
|00004040| 48 25 2c 32 35 20 b8 20 | 53 25 0d 1a 9a 20 c8 99 |H%,25 . |S%... ..|
|00004050| 22 45 63 6f 6e 65 74 5f | 44 65 41 6c 6c 6f 63 61 |"Econet_|DeAlloca|
|00004060| 74 65 50 6f 72 74 22 2c | 50 25 0d 1a a4 0c e7 20 |tePort",|P%..... |
|00004070| 53 25 3d 39 20 8c 0d 1a | ae 13 20 20 52 24 3d 24 |S%=9 ...|.. R$=$|
|00004080| 28 52 58 42 46 25 2b 32 | 29 0d 1a b8 10 20 20 52 |(RXBF%+2|).... R|
|00004090| 24 3d c0 52 24 2c 31 39 | 29 0d 1a c2 18 20 20 52 |$=.R$,19|).... R|
|000040a0| 24 3d 52 24 2b c4 32 30 | 2d a9 52 24 2c 22 20 22 |$=R$+.20|-.R$," "|
|000040b0| 29 0d 1a cc 05 cc 0d 1a | d6 0b 20 20 52 24 3d 22 |).......|.. R$="|
|000040c0| 22 0d 1a e0 05 cd 0d 1a | ea 07 3d 52 24 0d 1a f4 |".......|..=R$...|
|000040d0| 04 0d 1a fe 04 0d 1b 08 | 04 0d 1b 12 0c dd 20 f2 |........|...... .|
|000040e0| 5f 53 6f 72 74 0d 1b 1c | 10 e7 20 69 74 65 6d 73 |_Sort...|.. items|
|000040f0| 25 3e 30 20 8c 0d 1b 26 | 10 20 20 c8 8e 20 53 6f |%>0 ...&|. .. So|
|00004100| 72 74 25 20 ca 0d 1b 30 | 14 20 20 20 20 c9 20 30 |rt% ...0|. . 0|
|00004110| 20 3a f2 5f 53 6f 72 74 | 30 0d 1b 3a 14 20 20 20 | :._Sort|0..:. |
|00004120| 20 c9 20 31 20 3a f2 5f | 53 6f 72 74 31 0d 1b 44 | . 1 :._|Sort1..D|
|00004130| 14 20 20 20 20 c9 20 32 | 20 3a f2 5f 53 6f 72 74 |. . 2| :._Sort|
|00004140| 32 0d 1b 4e 07 20 20 cb | 0d 1b 58 05 cd 0d 1b 62 |2..N. .|..X....b|
|00004150| 05 e1 0d 1b 6c 04 0d 1b | 76 0d dd 20 f2 5f 53 6f |....l...|v.. ._So|
|00004160| 72 74 30 0d 1b 80 17 ea | 20 63 25 2c 69 25 2c 6a |rt0.....| c%,i%,j|
|00004170| 25 2c 6b 25 2c 6c 25 2c | 6d 25 0d 1b 8a 0f 63 25 |%,k%,l%,|m%....c%|
|00004180| 3d 69 74 65 6d 73 25 2d | 31 0d 1b 94 09 6d 25 3d |=items%-|1....m%=|
|00004190| 63 25 0d 1b 9e 16 6d 25 | 3d 6d 25 81 32 3a e7 6d |c%....m%|=m%.2:.m|
|000041a0| 25 3d 30 e5 8d 54 42 5c | 0d 1b a8 11 6b 25 3d 63 |%=0..TB\|....k%=c|
|000041b0| 25 2d 6d 25 3a 6a 25 3d | 30 0d 1b b2 09 69 25 3d |%-m%:j%=|0....i%=|
|000041c0| 6a 25 0d 1b bc 0c 6c 25 | 3d 69 25 2b 6d 25 0d 1b |j%....l%|=i%+m%..|
|000041d0| c6 3d e7 20 28 21 28 42 | 61 73 65 25 2b 34 30 2a |.=. (!(B|ase%+40*|
|000041e0| 69 25 29 80 26 46 46 46 | 46 29 20 3c 3d 20 28 21 |i%).&FFF|F) <= (!|
|000041f0| 28 42 61 73 65 25 2b 34 | 30 2a 6c 25 29 80 26 46 |(Base%+4|0*l%).&F|
|00004200| 46 46 46 29 20 20 e5 8d | 64 6e 5b 0d 1b d0 04 0d |FFF) ..|dn[.....|
|00004210| 1b da 0e f2 73 77 28 69 | 25 2c 6c 25 29 0d 1b e4 |....sw(i|%,l%)...|
|00004220| 18 69 25 3d 69 25 2d 6d | 25 3a e7 69 25 3e 3d 30 |.i%=i%-m|%:.i%>=0|
|00004230| e5 8d 74 7c 5b 0d 1b ee | 17 6a 25 3d 6a 25 2b 31 |..t|[...|.j%=j%+1|
|00004240| 3a e7 6a 25 3e 6b 25 e5 | 8d 74 5e 5b 0d 1b f8 09 |:.j%>k%.|.t^[....|
|00004250| e5 8d 74 72 5b 0d 1c 02 | 05 e1 0d 1c 0c 04 0d 1c |..tr[...|........|
|00004260| 16 0d dd 20 f2 5f 53 6f | 72 74 31 0d 1c 20 17 ea |... ._So|rt1.. ..|
|00004270| 20 63 25 2c 69 25 2c 6a | 25 2c 6b 25 2c 6c 25 2c | c%,i%,j|%,k%,l%,|
|00004280| 6d 25 0d 1c 2a 0f 63 25 | 3d 69 74 65 6d 73 25 2d |m%..*.c%|=items%-|
|00004290| 31 0d 1c 34 09 6d 25 3d | 63 25 0d 1c 3e 16 6d 25 |1..4.m%=|c%..>.m%|
|000042a0| 3d 6d 25 81 32 3a e7 6d | 25 3d 30 e5 8d 74 58 5c |=m%.2:.m|%=0..tX\|
|000042b0| 0d 1c 48 11 6b 25 3d 63 | 25 2d 6d 25 3a 6a 25 3d |..H.k%=c|%-m%:j%=|
|000042c0| 30 0d 1c 52 09 69 25 3d | 6a 25 0d 1c 5c 0c 6c 25 |0..R.i%=|j%..\.l%|
|000042d0| 3d 69 25 2b 6d 25 0d 1c | 66 42 e7 20 28 28 42 61 |=i%+m%..|fB. ((Ba|
|000042e0| 73 65 25 21 28 34 2b 34 | 30 2a 69 25 29 29 80 26 |se%!(4+4|0*i%)).&|
|000042f0| 46 46 46 46 29 20 3c 3d | 20 28 28 42 61 73 65 25 |FFFF) <=| ((Base%|
|00004300| 21 28 34 2b 34 30 2a 6c | 25 29 29 80 26 46 46 46 |!(4+40*l|%)).&FFF|
|00004310| 46 29 20 e5 8d 74 44 5c | 0d 1c 70 0e f2 73 77 28 |F) ..tD\|..p..sw(|
|00004320| 69 25 2c 6c 25 29 0d 1c | 7a 18 69 25 3d 69 25 2d |i%,l%)..|z.i%=i%-|
|00004330| 6d 25 3a e7 69 25 3e 3d | 30 e5 8d 44 5c 5c 0d 1c |m%:.i%>=|0..D\\..|
|00004340| 84 17 6a 25 3d 6a 25 2b | 31 3a e7 6a 25 3e 6b 25 |..j%=j%+|1:.j%>k%|
|00004350| e5 8d 54 7e 5c 0d 1c 8e | 09 e5 8d 44 52 5c 0d 1c |..T~\...|...DR\..|
|00004360| 98 05 e1 0d 1c a2 04 0d | 1c ac 0d dd 20 f2 5f 53 |........|.... ._S|
|00004370| 6f 72 74 32 0d 1c b6 17 | ea 20 63 25 2c 69 25 2c |ort2....|. c%,i%,|
|00004380| 6a 25 2c 6b 25 2c 6c 25 | 2c 6d 25 0d 1c c0 0f 63 |j%,k%,l%|,m%....c|
|00004390| 25 3d 69 74 65 6d 73 25 | 2d 31 0d 1c ca 09 6d 25 |%=items%|-1....m%|
|000043a0| 3d 63 25 0d 1c d4 16 6d | 25 3d 6d 25 81 32 3a e7 |=c%....m|%=m%.2:.|
|000043b0| 6d 25 3d 30 e5 8d 54 6e | 5d 0d 1c de 11 6b 25 3d |m%=0..Tn|]....k%=|
|000043c0| 63 25 2d 6d 25 3a 6a 25 | 3d 30 0d 1c e8 09 69 25 |c%-m%:j%|=0....i%|
|000043d0| 3d 6a 25 0d 1c f2 0c 6c | 25 3d 69 25 2b 6d 25 0d |=j%....l|%=i%+m%.|
|000043e0| 1c fc 46 e7 28 28 42 61 | 73 65 25 21 28 34 2b 34 |..F.((Ba|se%!(4+4|
|000043f0| 30 2a 69 25 29 29 80 26 | 46 46 46 46 30 30 30 30 |0*i%)).&|FFFF0000|
|00004400| 29 3c 3d 28 28 42 61 73 | 65 25 21 28 34 2b 34 30 |)<=((Bas|e%!(4+40|
|00004410| 2a 6c 25 29 29 80 26 46 | 46 46 46 30 30 30 30 29 |*l%)).&F|FFF0000)|
|00004420| e5 8d 54 5a 5d 0d 1d 06 | 0e f2 73 77 28 69 25 2c |..TZ]...|..sw(i%,|
|00004430| 6c 25 29 0d 1d 10 18 69 | 25 3d 69 25 2d 6d 25 3a |l%)....i|%=i%-m%:|
|00004440| e7 69 25 3e 3d 30 e5 8d | 64 72 5c 0d 1d 1a 17 6a |.i%>=0..|dr\....j|
|00004450| 25 3d 6a 25 2b 31 3a e7 | 6a 25 3e 6b 25 e5 8d 64 |%=j%+1:.|j%>k%..d|
|00004460| 54 5c 0d 1d 24 09 e5 8d | 64 68 5c 0d 1d 2e 05 e1 |T\..$...|dh\.....|
|00004470| 0d 1d 38 04 0d 1d 42 10 | dd 20 f2 73 77 28 41 25 |..8...B.|. .sw(A%|
|00004480| 2c 42 25 29 0d 1d 4c 15 | 41 25 3d 41 25 2a 34 30 |,B%)..L.|A%=A%*40|
|00004490| 3a 42 25 3d 42 25 2a 34 | 30 0d 1d 56 07 ea 43 25 |:B%=B%*4|0..V..C%|
|000044a0| 0d 1d 60 1c e3 20 43 25 | 3d 42 61 73 65 25 20 b8 |..`.. C%|=Base% .|
|000044b0| 20 42 61 73 65 25 2b 33 | 39 20 88 34 0d 1d 6a 12 | Base%+3|9 .4..j.|
|000044c0| c8 94 20 41 25 21 43 25 | 2c 42 25 21 43 25 0d 1d |.. A%!C%|,B%!C%..|
|000044d0| 74 05 ed 0d 1d 7e 05 e1 | 0d 1d 88 04 0d 1d 92 4d |t....~..|.......M|
|000044e0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000044f0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00004500| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00004510| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00004520| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 0d 1d 9c 4d 2a 2a 2a |********|*...M***|
|00004530| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00004540| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00004550| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00004560| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00004570| 2a 2a 2a 2a 2a 2a 0d 1d | a6 4d 2a 2a 2a 2a 2a 2a |******..|.M******|
|00004580| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00004590| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000045a0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000045b0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000045c0| 2a 2a 2a 0d 1d b0 4d 2a | 2a 2a 2a 2a 2a 2a 2a 2a |***...M*|********|
|000045d0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000045e0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000045f0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00004600| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00004610| 0d 1d ba 47 f4 20 54 68 | 65 20 66 6f 6c 6c 6f 77 |...G. Th|e follow|
|00004620| 69 6e 67 20 62 69 74 73 | 20 62 61 73 65 64 20 6f |ing bits| based o|
|00004630| 6e 20 63 6f 64 65 20 66 | 72 6f 6d 2e 20 28 43 29 |n code f|rom. (C)|
|00004640| 20 45 2e 53 70 69 6b 65 | 72 20 28 21 4d 75 6c 69 | E.Spike|r (!Muli|
|00004650| 74 50 72 69 6e 74 29 0d | 1d c4 36 f4 20 48 65 20 |tPrint).|..6. He |
|00004660| 70 72 6f 62 6c 61 62 6c | 79 20 67 6f 74 20 69 74 |problabl|y got it|
|00004670| 20 66 72 6f 6d 20 74 68 | 65 20 41 72 74 68 75 72 | from th|e Arthur|
|00004680| 20 31 2e 32 20 64 65 73 | 6b 74 6f 70 21 0d 1d ce | 1.2 des|ktop!...|
|00004690| 04 0d 1d d8 10 dd 20 f2 | 5f 49 6e 69 74 28 54 25 |...... .|_Init(T%|
|000046a0| 29 0d 1d e2 04 0d 1d ec | 04 0d 1d f6 19 e7 20 54 |).......|...... T|
|000046b0| 25 3d 30 20 8c 20 f2 5f | 49 6e 69 74 4d 65 6d 6f |%=0 . ._|InitMemo|
|000046c0| 72 79 0d 1e 00 04 0d 1e | 0a 0c 69 74 65 6d 73 25 |ry......|..items%|
|000046d0| 3d 30 0d 1e 14 0f 6d 61 | 78 69 74 65 6d 3d 32 30 |=0....ma|xitem=20|
|000046e0| 30 0d 1e 1e 0c e7 20 54 | 25 3d 30 20 8c 0d 1e 28 |0..... T|%=0 ...(|
|000046f0| 11 20 20 de 20 52 58 42 | 46 25 26 31 30 30 0d 1e |. . RXB|F%&100..|
|00004700| 32 1c f4 20 20 20 44 49 | 4d 20 68 65 61 70 20 6d |2.. DI|M heap m|
|00004710| 61 78 69 74 65 6d 2a 31 | 32 30 0d 1e 3c 19 f4 20 |axitem*1|20..<.. |
|00004720| 20 20 44 49 4d 20 4e 65 | 74 24 28 6d 61 78 69 74 | DIM Ne|t$(maxit|
|00004730| 65 6d 29 0d 1e 46 1a f4 | 20 20 20 44 49 4d 20 49 |em)..F..| DIM I|
|00004740| 6e 66 6f 25 28 6d 61 78 | 69 74 65 6d 29 0d 1e 50 |nfo%(max|item)..P|
|00004750| 1a f4 20 20 20 44 49 4d | 20 49 6e 66 6f 24 28 6d |.. DIM| Info$(m|
|00004760| 61 78 69 74 65 6d 29 0d | 1e 5a 19 f4 20 20 20 44 |axitem).|.Z.. D|
|00004770| 49 4d 20 4f 66 66 25 28 | 6d 61 78 69 74 65 6d 29 |IM Off%(|maxitem)|
|00004780| 0d 1e 64 0e 20 20 de 20 | 4d 24 28 31 36 29 0d 1e |..d. . |M$(16)..|
|00004790| 6e 21 f4 20 20 20 44 49 | 4d 20 44 69 73 70 6c 61 |n!. DI|M Displa|
|000047a0| 79 49 63 6f 6e 25 28 6d | 61 78 69 74 65 6d 29 0d |yIcon%(m|axitem).|
|000047b0| 1e 78 05 cd 0d 1e 82 04 | 0d 1e 8c 17 f4 20 44 69 |.x......|..... Di|
|000047c0| 73 70 6c 61 79 49 63 6f | 6e 25 28 29 3d 2d 31 0d |splayIco|n%()=-1.|
|000047d0| 1e 96 0e 53 74 61 74 69 | 6f 6e 25 3d 30 0d 1e a0 |...Stati|on%=0...|
|000047e0| 0c 4f 6e 4e 65 74 25 3d | 30 0d 1e aa 0c 44 6d 6f |.OnNet%=|0....Dmo|
|000047f0| 64 65 25 3d 30 0d 1e b4 | 0c 53 6d 6f 64 65 25 3d |de%=0...|.Smode%=|
|00004800| 31 0d 1e be 0b 53 6f 72 | 74 25 3d 30 0d 1e c8 0c |1....Sor|t%=0....|
|00004810| 53 74 69 6d 65 25 3d 30 | 0d 1e d2 0a f7 20 8d 64 |Stime%=0|..... .d|
|00004820| 66 5e 0d 1e dc 1a e3 20 | 41 25 3d 30 20 b8 20 31 |f^..... |A%=0 . 1|
|00004830| 34 3a f3 20 4d 24 28 41 | 25 29 3a ed 0d 1e e6 16 |4:. M$(A|%):.....|
|00004840| dc 20 22 52 65 73 65 72 | 76 65 64 20 20 20 20 20 |. "Reser|ved |
|00004850| 20 22 0d 1e f0 16 dc 20 | 22 42 42 43 20 4d 69 63 | "..... |"BBC Mic|
|00004860| 72 6f 20 20 20 20 20 22 | 0d 1e fa 16 dc 20 22 41 |ro "|..... "A|
|00004870| 63 6f 72 6e 20 41 74 6f | 6d 20 20 20 20 22 0d 1f |corn Ato|m "..|
|00004880| 04 16 dc 20 22 53 79 73 | 74 65 6d 20 33 2f 34 20 |... "Sys|tem 3/4 |
|00004890| 20 20 20 22 0d 1f 0e 16 | dc 20 22 53 79 73 74 65 | "....|. "Syste|
|000048a0| 6d 20 35 20 20 20 20 20 | 20 22 0d 1f 18 16 dc 20 |m 5 | "..... |
|000048b0| 22 4d 61 73 74 65 72 20 | 31 32 38 20 20 20 20 22 |"Master |128 "|
|000048c0| 0d 1f 22 16 dc 20 22 45 | 6c 65 63 74 72 6f 6e 20 |..".. "E|lectron |
|000048d0| 20 20 20 20 20 22 0d 1f | 2c 16 dc 20 22 41 72 63 | "..|,.. "Arc|
|000048e0| 68 69 6d 65 64 65 73 20 | 20 20 20 22 0d 1f 36 16 |himedes | "..6.|
|000048f0| dc 20 22 41 63 6f 72 6e | 20 20 20 20 20 20 20 20 |. "Acorn| |
|00004900| 20 22 0d 1f 40 16 dc 20 | 22 43 6f 6d 6d 75 6e 69 | "..@.. |"Communi|
|00004910| 63 61 74 6f 72 20 20 22 | 0d 1f 4a 16 dc 20 22 4d |cator "|..J.. "M|
|00004920| 61 73 74 65 72 20 45 54 | 20 20 20 20 20 22 0d 1f |aster ET| "..|
|00004930| 54 16 dc 20 22 46 69 6c | 65 73 74 6f 72 65 20 20 |T.. "Fil|estore |
|00004940| 20 20 20 22 0d 1f 5e 16 | dc 20 22 43 6f 6d 70 61 | "..^.|. "Compa|
|00004950| 63 74 20 20 20 20 20 20 | 20 22 0d 1f 68 16 dc 20 |ct | "..h.. |
|00004960| 22 45 63 6f 6c 69 6e 6b | 20 50 43 20 20 20 20 22 |"Ecolink| PC "|
|00004970| 0d 1f 72 16 dc 20 22 41 | 63 6f 72 6e 20 52 49 53 |..r.. "A|corn RIS|
|00004980| 43 20 69 58 20 22 0d 1f | 7c 05 e1 0d 1f 86 04 0d |C iX "..||.......|
|00004990| 1f 90 04 0d 1f 9a 04 0d | 1f a4 22 dd 20 f2 5f 41 |........|..". ._A|
|000049a0| 64 64 53 74 61 74 69 6f | 6e 28 4e 25 2c 53 25 2c |ddStatio|n(N%,S%,|
|000049b0| 44 25 2c 50 25 2c 46 24 | 29 0d 1f ae 11 ea 20 43 |D%,P%,F$|)..... C|
|000049c0| 25 2c 6e 25 2c 51 25 2c | 52 25 0d 1f b8 04 0d 1f |%,n%,Q%,|R%......|
|000049d0| c2 10 6e 25 3d 53 25 2b | 32 35 36 2a 4e 25 0d 1f |..n%=S%+|256*N%..|
|000049e0| c3 1a f4 20 54 77 6f 20 | 63 75 72 69 6f 75 73 20 |... Two |curious |
|000049f0| 63 6c 75 64 67 65 73 2e | 0d 1f cc 0d 50 25 3d 50 |cludges.|....P%=P|
|00004a00| 25 80 26 46 46 0d 1f d6 | 0e 46 24 3d c0 46 24 2c |%.&FF...|.F$=.F$,|
|00004a10| 32 36 29 0d 1f e0 04 0d | 1f ea 08 51 25 3d a3 0d |26).....|...Q%=..|
|00004a20| 1f f4 08 52 25 3d a3 0d | 1f fe 04 0d 20 08 18 f4 |...R%=..|.... ...|
|00004a30| 20 46 4f 52 20 43 25 3d | 30 20 54 4f 20 69 74 65 | FOR C%=|0 TO ite|
|00004a40| 6d 73 25 0d 20 12 29 e3 | 20 43 25 3d 42 61 73 65 |ms%. .).| C%=Base|
|00004a50| 25 20 b8 20 42 61 73 65 | 25 2b 34 30 2a 28 69 74 |% . Base|%+40*(it|
|00004a60| 65 6d 73 25 2d 31 29 20 | 88 20 34 30 0d 20 1c 04 |ems%-1) |. 40. ..|
|00004a70| 0d 20 26 25 f4 20 44 6f | 20 77 65 20 6b 6e 6f 77 |. &%. Do| we know|
|00004a80| 20 74 68 69 73 20 73 74 | 61 74 69 6f 6e 20 61 6c | this st|ation al|
|00004a90| 72 65 61 64 79 0d 20 30 | 17 e7 20 28 26 46 46 46 |ready. 0|.. (&FFF|
|00004aa0| 46 20 80 21 43 25 29 3d | 6e 25 20 8c 0d 20 3a 39 |F .!C%)=|n% .. :9|
|00004ab0| 20 20 e7 20 28 43 25 3f | 32 29 3d 30 20 80 20 28 | . (C%?|2)=0 . (|
|00004ac0| 43 25 3f 33 29 3d 50 25 | 20 80 20 28 43 25 21 34 |C%?3)=P%| . (C%!4|
|00004ad0| 29 3d 44 25 20 80 20 28 | 24 28 43 25 2b 38 29 3d |)=D% . (|$(C%+8)=|
|00004ae0| 46 24 29 20 8c 0d 20 44 | 39 20 20 20 20 f4 20 4e |F$) .. D|9 . N|
|00004af0| 6f 20 63 68 61 6e 67 65 | 20 69 6e 20 74 68 65 20 |o change| in the |
|00004b00| 64 61 74 61 20 73 6f 20 | 72 65 66 6f 72 6d 61 74 |data so |reformat|
|00004b10| 20 69 73 20 6e 6f 74 20 | 6e 65 65 64 65 64 0d 20 | is not |needed. |
|00004b20| 4e 07 20 20 cc 0d 20 58 | 3e 20 20 20 20 f4 20 53 |N. .. X|> . S|
|00004b30| 6f 6d 65 20 61 73 70 65 | 63 74 20 6f 66 20 74 68 |ome aspe|ct of th|
|00004b40| 65 20 64 61 74 61 20 68 | 61 73 20 63 68 61 6e 67 |e data h|as chang|
|00004b50| 65 64 20 66 6f 72 20 74 | 68 69 73 20 73 74 61 74 |ed for t|his stat|
|00004b60| 69 6f 6e 0d 20 76 0e 20 | 20 20 20 43 25 3f 32 3d |ion. v. | C%?2=|
|00004b70| 30 0d 20 8a 0f 20 20 20 | 20 43 25 3f 33 3d 50 25 |0. .. | C%?3=P%|
|00004b80| 0d 20 9e 0f 20 20 20 20 | 43 25 21 34 3d 44 25 0d |. .. |C%!4=D%.|
|00004b90| 20 da 12 20 20 20 20 24 | 28 43 25 2b 38 29 3d 46 | .. $|(C%+8)=F|
|00004ba0| 24 0d 20 e4 0c 20 20 20 | 20 52 25 3d b9 0d 21 02 |$. .. | R%=..!.|
|00004bb0| 07 20 20 cd 0d 21 0c 20 | 20 20 51 25 3d b9 3a f4 |. ..!. | Q%=.:.|
|00004bc0| 20 46 6f 75 6e 64 20 61 | 6e 64 20 70 72 6f 63 65 | Found a|nd proce|
|00004bd0| 73 73 65 64 0d 21 16 05 | cd 0d 21 20 05 ed 0d 21 |ssed.!..|..! ...!|
|00004be0| 2a 04 0d 21 34 3d f4 20 | 46 75 6e 6e 79 20 74 68 |*..!4=. |Funny th|
|00004bf0| 69 6e 67 73 20 67 6f 69 | 6e 67 20 6f 6e 20 68 65 |ings goi|ng on he|
|00004c00| 72 65 20 69 73 20 69 74 | 65 6d 20 74 68 65 20 6c |re is it|em the l|
|00004c10| 61 73 74 20 6f 6e 65 20 | 6f 72 20 6e 6f 74 3f 0d |ast one |or not?.|
|00004c20| 21 3e 04 0d 21 48 0c e7 | 20 51 25 3d a3 20 8c 0d |!>..!H..| Q%=. ..|
|00004c30| 21 52 18 20 20 43 25 3d | 42 61 73 65 25 2b 34 30 |!R. C%=|Base%+40|
|00004c40| 2a 69 74 65 6d 73 25 0d | 21 5c 32 20 20 f2 44 45 |*items%.|!\2 .DE|
|00004c50| 42 55 47 28 22 41 64 64 | 69 6e 67 20 61 20 6e 65 |BUG("Add|ing a ne|
|00004c60| 77 20 6f 6e 65 20 22 2b | c3 7e 42 61 73 65 25 2b |w one "+|.~Base%+|
|00004c70| 22 20 22 2b c3 7e 43 25 | 29 0d 21 66 28 20 20 f4 |" "+.~C%|).!f( .|
|00004c80| 20 4e 6f 74 20 66 6f 75 | 6e 64 20 73 6f 20 62 75 | Not fou|nd so bu|
|00004c90| 69 6c 64 20 61 20 6e 65 | 77 20 72 65 63 6f 72 64 |ild a ne|w record|
|00004ca0| 2e 0d 21 70 0c 20 20 21 | 43 25 3d 6e 25 0d 21 7a |..!p. !|C%=n%.!z|
|00004cb0| 0c 20 20 43 25 3f 32 3d | 30 0d 21 84 0d 20 20 43 |. C%?2=|0.!.. C|
|00004cc0| 25 3f 33 3d 50 25 0d 21 | 8e 0d 20 20 43 25 21 34 |%?3=P%.!|.. C%!4|
|00004cd0| 3d 44 25 0d 21 98 10 20 | 20 24 28 43 25 2b 38 29 |=D%.!.. | $(C%+8)|
|00004ce0| 3d 46 24 0d 21 a2 0f 20 | 20 69 74 65 6d 73 25 2b |=F$.!.. | items%+|
|00004cf0| 3d 31 0d 21 ac 0a 20 20 | 52 25 3d b9 0d 21 b6 05 |=1.!.. |R%=..!..|
|00004d00| cd 0d 21 c0 04 0d 21 ca | 21 e7 20 52 25 20 8c 20 |..!...!.|!. R% . |
|00004d10| f2 5f 53 6f 72 74 3a f2 | 5f 46 6f 72 6d 61 74 44 |._Sort:.|_FormatD|
|00004d20| 69 73 70 6c 61 79 0d 21 | d4 05 e1 0d 21 de 04 0d |isplay.!|....!...|
|00004d30| 21 e8 15 dd 20 f2 5f 46 | 6f 72 6d 61 74 44 69 73 |!... ._F|ormatDis|
|00004d40| 70 6c 61 79 0d 21 f2 1e | ea 20 6c 6f 6f 70 25 2c |play.!..|. loop%,|
|00004d50| 74 79 70 65 24 2c 68 70 | 74 72 2c 57 69 6e 64 6f |type$,hp|tr,Windo|
|00004d60| 77 25 0d 21 fc 18 e3 20 | 6c 6f 6f 70 25 3d 30 20 |w%.!... |loop%=0 |
|00004d70| b8 20 69 74 65 6d 73 25 | 2d 31 0d 22 06 13 20 20 |. items%|-1.".. |
|00004d80| 71 25 21 30 3d 44 69 73 | 70 6c 61 79 25 0d 22 10 |q%!0=Dis|play%.".|
|00004d90| 10 20 20 71 25 21 34 3d | 6c 6f 6f 70 25 0d 22 1a |. q%!4=|loop%.".|
|00004da0| 1f 20 20 c8 99 20 22 58 | 57 69 6d 70 5f 44 65 6c |. .. "X|Wimp_Del|
|00004db0| 65 74 65 49 63 6f 6e 22 | 2c 2c 71 25 0d 22 24 05 |eteIcon"|,,q%."$.|
|00004dc0| ed 0d 22 2e 04 0d 22 38 | 1f 57 69 6e 64 6f 77 25 |.."..."8|.Window%|
|00004dd0| 3d 42 61 73 65 25 2b 28 | 69 74 65 6d 73 25 2b 31 |=Base%+(|items%+1|
|00004de0| 29 2a 34 30 0d 22 42 04 | 0d 22 4c 17 f4 20 21 57 |)*40."B.|."L.. !W|
|00004df0| 69 6e 64 6f 77 25 3d 44 | 69 73 70 6c 61 79 25 0d |indow%=D|isplay%.|
|00004e00| 22 56 1b f4 20 52 65 61 | 64 20 61 6c 6c 20 77 69 |"V.. Rea|d all wi|
|00004e10| 6e 64 6f 77 20 69 6e 66 | 6f 2e 0d 22 60 26 f4 20 |ndow inf|o.."`&. |
|00004e20| 53 59 53 22 57 69 6d 70 | 5f 47 65 74 57 69 6e 64 |SYS"Wimp|_GetWind|
|00004e30| 6f 77 49 6e 66 6f 22 2c | 2c 57 69 6e 64 6f 77 25 |owInfo",|,Window%|
|00004e40| 0d 22 6a 26 f4 20 53 59 | 53 22 57 69 6d 70 5f 44 |."j&. SY|S"Wimp_D|
|00004e50| 65 6c 65 74 65 57 69 6e | 64 6f 77 22 20 2c 2c 57 |eleteWin|dow" ,,W|
|00004e60| 69 6e 64 6f 77 25 0d 22 | 74 34 f4 20 53 59 53 22 |indow%."|t4. SYS"|
|00004e70| 57 69 6d 70 5f 43 72 65 | 61 74 65 57 69 6e 64 6f |Wimp_Cre|ateWindo|
|00004e80| 77 22 20 2c 2c 57 69 6e | 64 6f 77 25 2b 34 20 54 |w" ,,Win|dow%+4 T|
|00004e90| 4f 20 44 69 73 70 6c 61 | 79 25 0d 22 7e 17 f4 20 |O Displa|y%."~.. |
|00004ea0| 21 57 69 6e 64 6f 77 25 | 3d 44 69 73 70 6c 61 79 |!Window%|=Display|
|00004eb0| 25 0d 22 88 23 f4 20 53 | 59 53 22 57 69 6d 70 5f |%.".#. S|YS"Wimp_|
|00004ec0| 4f 70 65 6e 57 69 6e 64 | 6f 77 22 2c 2c 57 69 6e |OpenWind|ow",,Win|
|00004ed0| 64 6f 77 25 0d 22 92 04 | 0d 22 9c 21 68 65 61 70 |dow%."..|.".!heap|
|00004ee0| 3d 57 69 6e 64 6f 77 25 | 2b 38 38 2b 28 69 74 65 |=Window%|+88+(ite|
|00004ef0| 6d 73 25 2b 31 29 2a 34 | 30 0d 22 a6 04 0d 22 b0 |ms%+1)*4|0."...".|
|00004f00| 11 71 25 21 30 3d 44 69 | 73 70 6c 61 79 25 0d 22 |.q%!0=Di|splay%."|
|00004f10| ba 20 c8 99 20 22 57 69 | 6d 70 5f 47 65 74 57 69 |. .. "Wi|mp_GetWi|
|00004f20| 6e 64 6f 77 53 74 61 74 | 65 22 2c 2c 71 25 0d 22 |ndowStat|e",,q%."|
|00004f30| c4 0f c8 8e 20 44 6d 6f | 64 65 25 20 ca 0d 22 ce |.... Dmo|de% ..".|
|00004f40| 29 20 20 c9 20 30 3a 20 | 78 69 74 65 6d 73 25 3d |) . 0: |xitems%=|
|00004f50| a8 20 28 28 71 25 21 31 | 32 2d 71 25 21 34 29 20 |. ((q%!1|2-q%!4) |
|00004f60| 2f 20 31 38 38 29 0d 22 | d8 14 20 20 c9 20 31 3a |/ 188)."|.. . 1:|
|00004f70| 20 78 69 74 65 6d 73 25 | 3d 31 0d 22 e2 29 20 20 | xitems%|=1.".) |
|00004f80| c9 20 32 3a 20 78 69 74 | 65 6d 73 25 3d a8 20 28 |. 2: xit|ems%=. (|
|00004f90| 28 71 25 21 31 32 2d 71 | 25 21 34 29 20 2f 20 31 |(q%!12-q|%!4) / 1|
|00004fa0| 36 36 29 0d 22 ec 05 cb | 0d 22 f6 1b e7 20 78 69 |66)."...|."... xi|
|00004fb0| 74 65 6d 73 25 3d 30 20 | 8c 20 78 69 74 65 6d 73 |tems%=0 |. xitems|
|00004fc0| 25 3d 31 0d 23 00 19 79 | 3d 2d a8 28 69 74 65 6d |%=1.#..y|=-.(item|
|00004fd0| 73 25 2f 2d 78 69 74 65 | 6d 73 25 29 0d 23 0a 0a |s%/-xite|ms%).#..|
|00004fe0| 71 25 21 30 3d 30 0d 23 | 14 0b 71 25 21 31 32 3d |q%!0=0.#|..q%!12=|
|00004ff0| 30 0d 23 1e 0f c8 8e 20 | 44 6d 6f 64 65 25 20 ca |0.#.... |Dmode% .|
|00005000| 0d 23 28 09 20 20 c9 20 | 30 0d 23 32 2a 20 20 20 |.#(. . |0.#2* |
|00005010| 20 71 25 21 38 3d a4 6d | 61 78 28 6d 69 6e 65 78 | q%!8=.m|ax(minex|
|00005020| 74 65 6e 74 25 2c 31 38 | 38 2a 69 74 65 6d 73 25 |tent%,18|8*items%|
|00005030| 2b 36 29 0d 23 3c 18 20 | 20 20 20 71 25 21 34 3d |+6).#<. | q%!4=|
|00005040| 2d 28 31 32 33 2a 79 2b | 31 34 29 0d 23 46 09 20 |-(123*y+|14).#F. |
|00005050| 20 c9 20 31 0d 23 50 11 | 20 20 20 20 71 25 21 38 | . 1.#P.| q%!8|
|00005060| 3d 31 31 38 32 0d 23 5a | 17 20 20 20 20 71 25 21 |=1182.#Z|. q%!|
|00005070| 34 3d 2d 28 34 34 2a 79 | 2b 31 34 29 0d 23 64 09 |4=-(44*y|+14).#d.|
|00005080| 20 20 c9 20 32 0d 23 6e | 2a 20 20 20 20 71 25 21 | . 2.#n|* q%!|
|00005090| 38 3d a4 6d 61 78 28 6d | 69 6e 65 78 74 65 6e 74 |8=.max(m|inextent|
|000050a0| 25 2c 31 36 30 2a 69 74 | 65 6d 73 25 2b 36 29 0d |%,160*it|ems%+6).|
|000050b0| 23 78 17 20 20 20 20 71 | 25 21 34 3d 2d 28 34 34 |#x. q|%!4=-(44|
|000050c0| 2a 79 2b 31 34 29 0d 23 | 82 05 cb 0d 23 8c 23 c8 |*y+14).#|....#.#.|
|000050d0| 99 20 22 57 69 6d 70 5f | 53 65 74 45 78 74 65 6e |. "Wimp_|SetExten|
|000050e0| 74 22 2c 44 69 73 70 6c | 61 79 25 2c 71 25 0d 23 |t",Displ|ay%,q%.#|
|000050f0| 96 11 e7 20 69 74 65 6d | 73 25 3c 3e 30 20 8c 0d |... item|s%<>0 ..|
|00005100| 23 a0 0f 20 20 68 70 74 | 72 3d 68 65 61 70 0d 23 |#.. hpt|r=heap.#|
|00005110| aa 0f 20 20 79 31 3d 30 | 3a 78 31 3d 30 0d 23 b4 |.. y1=0|:x1=0.#.|
|00005120| 1a 20 20 e3 20 6c 6f 6f | 70 25 3d 30 20 b8 20 69 |. . loo|p%=0 . i|
|00005130| 74 65 6d 73 25 2d 31 0d | 23 be 1e 20 20 20 20 52 |tems%-1.|#.. R|
|00005140| 65 63 6f 72 64 25 3d 42 | 61 73 65 25 2b 34 30 2a |ecord%=B|ase%+40*|
|00005150| 6c 6f 6f 70 25 0d 23 c8 | 3b 20 20 20 20 e7 20 a4 |loop%.#.|; . .|
|00005160| 5f 43 68 65 63 6b 4d 65 | 6d 6f 72 79 28 68 70 74 |_CheckMe|mory(hpt|
|00005170| 72 2b 31 30 32 34 29 3d | 30 20 8c 20 85 20 30 2c |r+1024)=|0 . . 0,|
|00005180| 22 4e 6f 74 20 65 6e 6f | 75 67 68 20 52 41 4d 22 |"Not eno|ugh RAM"|
|00005190| 0d 23 d2 04 0d 23 dc 34 | 20 20 20 20 74 79 70 65 |.#...#.4| type|
|000051a0| 24 3d 22 6e 65 74 5f 22 | 2b c2 22 30 30 30 22 2b |$="net_"|+."000"+|
|000051b0| c3 7e 28 28 52 65 63 6f | 72 64 25 21 34 29 80 26 |.~((Reco|rd%!4).&|
|000051c0| 46 46 46 46 29 2c 34 29 | 0d 23 e6 2e 20 20 20 20 |FFFF),4)|.#.. |
|000051d0| c8 99 20 22 58 57 69 6d | 70 5f 53 70 72 69 74 65 |.. "XWim|p_Sprite|
|000051e0| 4f 70 22 2c 32 34 2c 2c | 74 79 70 65 24 20 b8 20 |Op",24,,|type$ . |
|000051f0| 3b 66 6c 61 67 73 0d 23 | f0 28 20 20 20 20 e7 20 |;flags.#|.( . |
|00005200| 28 66 6c 61 67 73 20 80 | 20 31 29 20 8c 20 74 79 |(flags .| 1) . ty|
|00005210| 70 65 24 3d 22 6e 65 74 | 5f 78 78 78 78 22 0d 23 |pe$="net|_xxxx".#|
|00005220| fa 17 20 20 20 20 74 79 | 70 65 24 3d 22 73 22 2b |.. ty|pe$="s"+|
|00005230| 74 79 70 65 24 0d 24 04 | 15 20 20 20 20 71 25 21 |type$.$.|. q%!|
|00005240| 30 3d 44 69 73 70 6c 61 | 79 25 0d 24 0e 13 20 20 |0=Displa|y%.$.. |
|00005250| 20 20 c8 8e 20 44 6d 6f | 64 65 25 20 ca 0d 24 18 | .. Dmo|de% ..$.|
|00005260| 0d 20 20 20 20 20 20 c9 | 20 30 0d 24 22 30 20 20 |. .| 0.$"0 |
|00005270| 20 20 20 20 20 20 71 25 | 21 34 20 3d 31 38 38 2a | q%|!4 =188*|
|00005280| 78 31 2b 36 20 20 3a 71 | 25 21 38 20 3d 2d 28 31 |x1+6 :q|%!8 =-(1|
|00005290| 32 34 2a 79 31 2b 31 33 | 30 29 0d 24 2c 2f 20 20 |24*y1+13|0).$,/ |
|000052a0| 20 20 20 20 20 20 71 25 | 21 31 32 3d 31 38 38 2a | q%|!12=188*|
|000052b0| 78 31 2b 31 38 36 3a 71 | 25 21 31 36 3d 2d 28 31 |x1+186:q|%!16=-(1|
|000052c0| 32 34 2a 79 31 2b 31 34 | 29 0d 24 36 33 20 20 20 |24*y1+14|).$63 |
|000052d0| 20 20 20 20 20 71 25 21 | 32 30 3d 25 30 30 30 31 | q%!|20=%0001|
|000052e0| 30 31 31 31 30 30 30 30 | 30 30 30 31 30 30 31 30 |01110000|00010010|
|000052f0| 30 30 30 31 30 30 30 30 | 31 30 31 31 0d 24 40 2b |00010000|1011.$@+|
|00005300| 20 20 20 20 20 20 20 20 | 71 25 21 32 34 3d 68 70 | |q%!24=hp|
|00005310| 74 72 3a 24 68 70 74 72 | 3d a4 5f 4e 65 74 28 52 |tr:$hptr|=._Net(R|
|00005320| 65 63 6f 72 64 25 29 0d | 24 4a 0d 20 20 20 20 20 |ecord%).|$J. |
|00005330| 20 c9 20 31 0d 24 54 13 | 20 20 20 20 20 20 20 20 | . 1.$T.| |
|00005340| 71 25 21 34 20 3d 36 0d | 24 5e 1d 20 20 20 20 20 |q%!4 =6.|$^. |
|00005350| 20 20 20 71 25 21 38 20 | 3d 2d 28 34 34 2a 79 31 | q%!8 |=-(44*y1|
|00005360| 2b 34 38 29 0d 24 68 21 | 20 20 20 20 20 20 20 20 |+48).$h!| |
|00005370| 71 25 21 31 32 3d 36 2b | 31 30 32 34 2b 31 32 38 |q%!12=6+|1024+128|
|00005380| 2b 38 2b 31 32 0d 24 72 | 1d 20 20 20 20 20 20 20 |+8+12.$r|. |
|00005390| 20 71 25 21 31 36 3d 2d | 28 34 34 2a 79 31 2b 31 | q%!16=-|(44*y1+1|
|000053a0| 34 29 0d 24 7c 33 20 20 | 20 20 20 20 20 20 71 25 |4).$|3 | q%|
|000053b0| 21 32 30 3d 25 30 30 30 | 31 30 31 31 31 30 30 30 |!20=%000|10111000|
|000053c0| 30 30 30 30 31 30 30 31 | 30 31 30 31 31 30 30 30 |00001001|01011000|
|000053d0| 31 31 30 31 31 0d 24 86 | 16 20 20 20 20 20 20 20 |11011.$.|. |
|000053e0| 20 71 25 21 32 34 3d 68 | 70 74 72 0d 24 90 4f 20 | q%!24=h|ptr.$.O |
|000053f0| 20 20 20 20 20 20 20 24 | 68 70 74 72 3d a4 5f 4e | $|hptr=._N|
|00005400| 65 74 28 52 65 63 6f 72 | 64 25 29 2b 22 20 22 2b |et(Recor|d%)+" "+|
|00005410| a4 5f 4d 61 63 68 69 6e | 65 28 52 65 63 6f 72 64 |._Machin|e(Record|
|00005420| 25 21 34 29 2b 22 20 20 | 22 2b a4 5f 49 6e 66 6f |%!4)+" |"+._Info|
|00005430| 53 28 52 65 63 6f 72 64 | 25 29 0d 24 9a 0d 20 20 |S(Record|%).$.. |
|00005440| 20 20 20 20 c9 20 32 0d | 24 a4 1a 20 20 20 20 20 | . 2.|$.. |
|00005450| 20 20 20 71 25 21 34 20 | 3d 31 36 30 2a 78 31 2b | q%!4 |=160*x1+|
|00005460| 36 0d 24 ae 1d 20 20 20 | 20 20 20 20 20 71 25 21 |6.$.. | q%!|
|00005470| 38 20 3d 2d 28 34 34 2a | 79 31 2b 34 38 29 0d 24 |8 =-(44*|y1+48).$|
|00005480| b8 1c 20 20 20 20 20 20 | 20 20 71 25 21 31 32 3d |.. | q%!12=|
|00005490| 31 36 30 2a 78 31 2b 31 | 36 36 0d 24 c2 1d 20 20 |160*x1+1|66.$.. |
|000054a0| 20 20 20 20 20 20 71 25 | 21 31 36 3d 2d 28 34 34 | q%|!16=-(44|
|000054b0| 2a 79 31 2b 31 34 29 0d | 24 cc 33 20 20 20 20 20 |*y1+14).|$.3 |
|000054c0| 20 20 20 71 25 21 32 30 | 3d 25 30 30 30 31 30 31 | q%!20|=%000101|
|000054d0| 31 31 30 30 30 30 30 30 | 30 31 30 30 31 30 31 30 |11000000|01001010|
|000054e0| 31 31 30 30 30 31 31 30 | 31 31 0d 24 d6 2b 20 20 |11000110|11.$.+ |
|000054f0| 20 20 20 20 20 20 71 25 | 21 32 34 3d 68 70 74 72 | q%|!24=hptr|
|00005500| 3a 24 68 70 74 72 3d a4 | 5f 4e 65 74 28 52 65 63 |:$hptr=.|_Net(Rec|
|00005510| 6f 72 64 25 29 0d 24 e0 | 09 20 20 20 20 cb 0d 24 |ord%).$.|. ..$|
|00005520| ea 04 0d 24 f4 3d 20 20 | 20 20 e7 20 28 52 65 63 |...$.= | . (Rec|
|00005530| 6f 72 64 25 3f 32 29 3d | 31 20 8c 20 71 25 21 32 |ord%?2)=|1 . q%!2|
|00005540| 30 3d 28 71 25 21 32 30 | 29 20 84 20 31 3c 3c 32 |0=(q%!20|) . 1<<2|
|00005550| 32 3a 20 f4 20 47 72 65 | 79 65 64 20 6f 75 74 0d |2: . Gre|yed out.|
|00005560| 24 fe 04 0d 25 08 27 20 | 20 20 20 71 25 21 33 32 |$...%.' | q%!32|
|00005570| 3d 31 2b a9 28 24 28 71 | 25 21 32 34 29 29 3a 68 |=1+.($(q|%!24)):h|
|00005580| 70 74 72 2b 3d 71 25 21 | 33 32 0d 25 12 2f 20 20 |ptr+=q%!|32.%./ |
|00005590| 20 20 71 25 21 32 38 3d | 68 70 74 72 3a 24 68 70 | q%!28=|hptr:$hp|
|000055a0| 74 72 3d 74 79 70 65 24 | 3a 68 70 74 72 2b 3d 28 |tr=type$|:hptr+=(|
|000055b0| a9 74 79 70 65 24 2b 31 | 29 0d 25 1c 04 0d 25 26 |.type$+1|).%...%&|
|000055c0| 56 f4 20 50 52 4f 43 44 | 45 42 55 47 28 53 54 52 |V. PROCD|EBUG(STR|
|000055d0| 24 7e 48 49 4d 45 4d 2b | 22 20 22 2b 53 54 52 24 |$~HIMEM+|" "+STR$|
|000055e0| 7e 42 61 73 65 25 2b 22 | 20 22 2b 53 54 52 24 7e |~Base%+"| "+STR$~|
|000055f0| 68 65 61 70 2b 22 20 22 | 2b 53 54 52 24 7e 68 70 |heap+" "|+STR$~hp|
|00005600| 74 72 2b 22 20 22 2b 53 | 54 52 24 7e 4c 69 6d 69 |tr+" "+S|TR$~Limi|
|00005610| 74 25 29 0d 25 30 2b 20 | 20 20 20 c8 99 20 22 57 |t%).%0+ | .. "W|
|00005620| 69 6d 70 5f 43 72 65 61 | 74 65 49 63 6f 6e 22 2c |imp_Crea|teIcon",|
|00005630| 2c 71 25 20 3a f4 20 54 | 4f 20 69 25 21 34 0d 25 |,q% :. T|O i%!4.%|
|00005640| 3a 40 20 20 20 20 f4 20 | 21 69 25 3d 44 69 73 70 |:@ . |!i%=Disp|
|00005650| 6c 61 79 25 3a 69 25 21 | 38 3d 30 3a 69 25 21 31 |lay%:i%!|8=0:i%!1|
|00005660| 32 3d 30 3a 53 59 53 22 | 57 69 6d 70 5f 53 65 74 |2=0:SYS"|Wimp_Set|
|00005670| 49 63 6f 6e 53 74 61 74 | 65 22 2c 2c 69 25 0d 25 |IconStat|e",,i%.%|
|00005680| 44 0d 20 20 20 20 78 31 | 2b 3d 31 0d 25 4e 21 20 |D. x1|+=1.%N! |
|00005690| 20 20 20 e7 20 78 31 3d | 78 69 74 65 6d 73 25 20 | . x1=|xitems% |
|000056a0| 8c 20 78 31 3d 30 3a 79 | 31 2b 3d 31 0d 25 58 07 |. x1=0:y|1+=1.%X.|
|000056b0| 20 20 ed 0d 25 62 05 cd | 0d 25 6c 11 71 25 21 30 | ..%b..|.%l.q%!0|
|000056c0| 3d 44 69 73 70 6c 61 79 | 25 0d 25 76 33 c8 99 20 |=Display|%.%v3.. |
|000056d0| 22 57 69 6d 70 5f 46 6f | 72 63 65 52 65 64 72 61 |"Wimp_Fo|rceRedra|
|000056e0| 77 22 2c 44 69 73 70 6c | 61 79 25 2c 30 2c 2d 31 |w",Displ|ay%,0,-1|
|000056f0| 30 30 30 30 2c 31 30 30 | 30 30 2c 30 0d 25 80 13 |0000,100|00,0.%..|
|00005700| f2 67 65 74 77 28 44 69 | 73 70 6c 61 79 25 29 0d |.getw(Di|splay%).|
|00005710| 25 8a 16 e7 20 66 6c 61 | 67 73 25 20 80 20 31 3c |%... fla|gs% . 1<|
|00005720| 3c 31 36 20 8c 0d 25 94 | 2e 20 20 21 71 25 3d 44 |<16 ..%.|. !q%=D|
|00005730| 69 73 70 6c 61 79 25 3a | c8 99 22 57 69 6d 70 5f |isplay%:|.."Wimp_|
|00005740| 47 65 74 57 69 6e 64 6f | 77 53 74 61 74 65 22 2c |GetWindo|wState",|
|00005750| 2c 71 25 0d 25 9e 2a 20 | 20 21 71 25 3d 44 69 73 |,q%.%.* | !q%=Dis|
|00005760| 70 6c 61 79 25 3a c8 99 | 22 57 69 6d 70 5f 4f 70 |play%:..|"Wimp_Op|
|00005770| 65 6e 57 69 6e 64 6f 77 | 22 2c 2c 71 25 0d 25 a8 |enWindow|",,q%.%.|
|00005780| 40 20 20 f4 20 50 52 4f | 43 5f 4f 70 65 6e 28 44 |@ . PRO|C_Open(D|
|00005790| 69 73 70 6c 61 79 25 2c | 78 30 25 2c 79 30 25 2c |isplay%,|x0%,y0%,|
|000057a0| 78 31 25 2c 79 31 25 2c | 73 63 78 25 2c 73 63 79 |x1%,y1%,|scx%,scy|
|000057b0| 25 2c 62 68 61 6e 64 6c | 65 25 2c 30 29 0d 25 b2 |%,bhandl|e%,0).%.|
|000057c0| 07 20 20 cd 0d 25 bc 05 | e1 0d 25 c6 04 0d 25 d0 |. ..%..|..%...%.|
|000057d0| 14 dd 20 f2 67 65 74 77 | 28 68 61 6e 64 6c 65 25 |.. .getw|(handle%|
|000057e0| 29 0d 25 da 2c 21 71 25 | 3d 68 61 6e 64 6c 65 25 |).%.,!q%|=handle%|
|000057f0| 3a c8 99 20 22 57 69 6d | 70 5f 47 65 74 57 69 6e |:.. "Wim|p_GetWin|
|00005800| 64 6f 77 53 74 61 74 65 | 22 2c 2c 71 25 0d 25 e4 |dowState|",,q%.%.|
|00005810| 1f 78 30 25 3d 71 25 21 | 34 3a 79 30 25 3d 71 25 |.x0%=q%!|4:y0%=q%|
|00005820| 21 38 3a 78 31 25 3d 71 | 25 21 31 32 0d 25 ee 23 |!8:x1%=q|%!12.%.#|
|00005830| 79 31 25 3d 71 25 21 31 | 36 3a 73 63 78 25 3d 71 |y1%=q%!1|6:scx%=q|
|00005840| 25 21 32 30 3a 73 63 79 | 25 3d 71 25 21 32 34 0d |%!20:scy|%=q%!24.|
|00005850| 25 f8 1d 62 78 25 3d 78 | 30 25 2d 73 63 78 25 3a |%..bx%=x|0%-scx%:|
|00005860| 62 79 25 3d 79 31 25 2d | 73 63 79 25 0d 26 02 1f |by%=y1%-|scy%.&..|
|00005870| 62 68 61 6e 64 6c 65 25 | 3d 71 25 21 32 38 3a 66 |bhandle%|=q%!28:f|
|00005880| 6c 61 67 73 25 3d 71 25 | 21 33 32 0d 26 0c 05 e1 |lags%=q%|!32.&...|
|00005890| 0d 26 16 04 0d 26 20 1e | dd 20 a4 6d 61 78 28 61 |.&...& .|. .max(a|
|000058a0| 2c 62 29 3a e7 20 61 3e | 62 20 3d 20 61 20 8b 20 |,b):. a>|b = a . |
|000058b0| 3d 62 0d 26 2a 04 0d 26 | 34 17 dd 20 a4 6d 65 6d |=b.&*..&|4.. .mem|
|000058c0| 74 6f 73 74 72 28 70 74 | 72 2c 6d 6c 29 0d 26 3e |tostr(pt|r,ml).&>|
|000058d0| 17 ea 20 66 24 2c 6d 61 | 78 3a 6d 61 78 3d 70 74 |.. f$,ma|x:max=pt|
|000058e0| 72 2b 6d 6c 0d 26 48 26 | c8 95 20 3f 70 74 72 20 |r+ml.&H&|.. ?ptr |
|000058f0| 80 20 70 74 72 3c 6d 61 | 78 20 66 24 2b 3d bd 3f |. ptr<ma|x f$+=.?|
|00005900| 70 74 72 3a 70 74 72 2b | 3d 31 0d 26 52 05 ce 0d |ptr:ptr+|=1.&R...|
|00005910| 26 5c 07 3d 66 24 0d 26 | 66 04 0d 26 70 1d f4 20 |&\.=f$.&|f..&p.. |
|00005920| 4d 65 6d 6f 72 79 20 61 | 6c 6c 6f 63 61 74 69 6f |Memory a|llocatio|
|00005930| 6e 20 73 74 75 66 66 0d | 26 7a 30 f4 20 42 61 73 |n stuff.|&z0. Bas|
|00005940| 65 25 20 69 73 20 74 68 | 65 20 73 74 61 72 74 20 |e% is th|e start |
|00005950| 6f 66 20 74 68 65 20 64 | 79 6e 61 6d 69 63 20 64 |of the d|ynamic d|
|00005960| 61 74 61 20 61 72 65 0d | 26 84 3b f4 20 69 74 65 |ata are.|&.;. ite|
|00005970| 6d 73 25 20 49 73 20 74 | 68 65 20 6e 75 6d 62 65 |ms% Is t|he numbe|
|00005980| 72 20 6f 66 20 69 74 65 | 6d 73 20 6f 66 20 64 61 |r of ite|ms of da|
|00005990| 74 61 20 69 6e 20 74 68 | 65 20 64 61 74 61 62 61 |ta in th|e databa|
|000059a0| 73 65 0d 26 8e 38 f4 20 | 20 20 20 20 20 20 20 69 |se.&.8. | i|
|000059b0| 74 20 67 65 6e 65 72 61 | 6c 6c 79 20 70 6f 69 6e |t genera|lly poin|
|000059c0| 74 73 20 74 6f 20 74 68 | 65 20 6e 65 78 74 20 66 |ts to th|e next f|
|000059d0| 72 65 65 20 65 6e 74 72 | 79 2e 0d 26 98 37 f4 20 |ree entr|y..&.7. |
|000059e0| 4c 69 6d 69 74 25 20 49 | 73 20 74 68 65 20 6c 61 |Limit% I|s the la|
|000059f0| 73 74 20 62 79 74 65 20 | 6f 66 20 74 68 65 20 64 |st byte |of the d|
|00005a00| 79 6e 61 6d 69 63 20 64 | 61 74 61 20 61 72 65 61 |ynamic d|ata area|
|00005a10| 2e 0d 26 a2 2f f4 20 68 | 65 61 70 25 20 20 49 73 |..&./. h|eap% Is|
|00005a20| 20 74 68 65 20 73 74 61 | 72 74 20 6f 66 20 74 68 | the sta|rt of th|
|00005a30| 65 20 49 63 6f 6e 20 64 | 61 74 61 20 61 72 65 61 |e Icon d|ata area|
|00005a40| 0d 26 ac 44 f4 20 44 69 | 73 70 6c 61 79 49 63 6f |.&.D. Di|splayIco|
|00005a50| 6e 25 20 49 73 20 61 20 | 70 6f 69 6e 74 65 72 20 |n% Is a |pointer |
|00005a60| 74 6f 20 74 68 69 73 20 | 61 72 72 61 79 2e 20 20 |to this |array. |
|00005a70| 49 74 20 69 73 20 69 74 | 65 6d 73 20 6c 6f 6e 67 |It is it|ems long|
|00005a80| 20 61 6e 64 0d 26 b6 1c | f4 20 65 78 69 73 74 73 | and.&..|. exists|
|00005a90| 20 61 62 6f 76 65 20 74 | 68 65 20 64 61 74 61 2e | above t|he data.|
|00005aa0| 0d 26 c0 05 f4 0d 26 ca | 05 f4 0d 26 d4 05 f4 0d |.&....&.|...&....|
|00005ab0| 26 de 43 f4 20 20 20 4c | 69 6d 69 74 25 20 20 20 |&.C. L|imit% |
|00005ac0| 20 20 20 20 2d 3e 20 20 | 4e 4f 20 52 41 4d 20 48 | -> |NO RAM H|
|00005ad0| 45 52 45 20 41 64 64 72 | 65 73 73 20 65 78 63 65 |ERE Addr|ess exce|
|00005ae0| 70 74 69 6f 6e 73 20 72 | 61 69 73 65 64 21 21 21 |ptions r|aised!!!|
|00005af0| 21 21 0d 26 e8 25 f4 20 | 20 20 20 20 20 20 20 20 |!!.&.%. | |
|00005b00| 20 20 20 20 20 20 20 20 | 20 20 20 7d 20 20 49 63 | | } Ic|
|00005b10| 6f 6e 20 64 61 74 61 0d | 26 f2 21 f4 20 20 20 20 |on data.|&.!. |
|00005b20| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00005b30| 7d 20 20 20 20 20 20 22 | 0d 26 fc 21 f4 20 20 20 |} "|.&.!. |
|00005b40| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00005b50| 20 7d 20 20 20 20 20 20 | 22 0d 27 06 21 f4 20 20 | } |".'.!. |
|00005b60| 20 48 65 61 70 25 20 20 | 20 20 20 20 20 20 2d 3e | Heap% | ->|
|00005b70| 20 20 7d 20 20 20 20 20 | 20 22 0d 27 10 2b f4 20 | } | ".'.+. |
|00005b80| 52 45 4d 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |REM | |
|00005b90| 20 20 20 20 20 20 20 7d | 20 49 63 6f 6e 20 68 61 | }| Icon ha|
|00005ba0| 6e 64 6c 65 73 0d 27 1a | 25 f4 20 52 45 4d 20 20 |ndles.'.|%. REM |
|00005bb0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00005bc0| 20 20 7d 20 20 20 20 20 | 20 22 0d 27 24 25 f4 20 | } | ".'$%. |
|00005bd0| 52 45 4d 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |REM | |
|00005be0| 20 20 20 20 20 20 20 7d | 20 20 20 20 20 20 22 0d | }| ".|
|00005bf0| 27 2e 25 f4 20 52 45 4d | 20 20 20 44 69 73 70 6c |'.%. REM| Displ|
|00005c00| 61 79 49 63 6f 6e 25 20 | 2d 3e 20 20 7d 20 20 20 |ayIcon% |-> } |
|00005c10| 20 20 20 22 0d 27 38 26 | f4 20 20 20 34 30 2a 28 | ".'8&|. 40*(|
|00005c20| 69 74 65 6d 73 25 29 20 | 20 2d 3e 20 20 7d 20 46 |items%) | -> } F|
|00005c30| 72 65 65 20 72 65 63 6f | 72 64 0d 27 42 24 f4 20 |ree reco|rd.'B$. |
|00005c40| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00005c50| 20 20 20 7d 20 20 20 52 | 65 63 6f 72 64 73 0d 27 | } R|ecords.'|
|00005c60| 4c 21 f4 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |L!. | |
|00005c70| 20 20 20 20 20 20 20 7d | 20 20 20 20 20 20 22 0d | }| ".|
|00005c80| 27 56 21 f4 20 20 20 20 | 20 20 20 20 20 20 20 20 |'V!. | |
|00005c90| 20 20 20 20 20 20 20 20 | 7d 20 20 20 20 20 20 22 | |} "|
|00005ca0| 0d 27 60 21 f4 20 20 20 | 42 61 73 65 25 20 20 20 |.'`!. |Base% |
|00005cb0| 20 20 20 20 20 2d 3e 20 | 20 7d 20 20 20 20 20 20 | -> | } |
|00005cc0| 22 0d 27 6a 05 f4 0d 27 | 74 05 f4 0d 27 7e 48 f4 |".'j...'|t...'~H.|
|00005cd0| 20 48 65 61 70 25 20 26 | 20 44 69 73 70 6c 61 79 | Heap% &| Display|
|00005ce0| 49 63 6f 6e 25 20 61 72 | 65 20 63 61 6c 63 75 6c |Icon% ar|e calcul|
|00005cf0| 61 74 65 64 20 61 6e 64 | 20 72 65 66 69 6c 6c 65 |ated and| refille|
|00005d00| 64 20 77 68 65 6e 20 61 | 20 6e 65 77 20 72 65 63 |d when a| new rec|
|00005d10| 6f 72 64 0d 27 88 47 f4 | 20 69 73 20 61 64 64 65 |ord.'.G.| is adde|
|00005d20| 64 20 69 6e 74 6f 20 74 | 68 65 20 64 61 74 61 20 |d into t|he data |
|00005d30| 61 72 65 61 2e 20 20 54 | 68 65 20 6e 65 77 20 72 |area. T|he new r|
|00005d40| 65 63 6f 72 64 20 69 73 | 20 61 6c 77 61 79 73 20 |ecord is| always |
|00005d50| 61 64 64 65 64 20 69 6e | 74 6f 0d 27 92 46 f4 20 |added in|to.'.F. |
|00005d60| 74 68 65 20 66 72 65 65 | 20 73 70 61 63 65 20 61 |the free| space a|
|00005d70| 6e 64 20 74 68 65 20 69 | 63 6f 6e 73 20 64 65 6c |nd the i|cons del|
|00005d80| 65 74 65 64 20 61 6e 64 | 20 72 65 63 72 65 61 74 |eted and| recreat|
|00005d90| 65 64 2e 20 20 54 68 65 | 20 64 61 74 61 20 69 73 |ed. The| data is|
|00005da0| 0d 27 9c 1a f4 20 70 72 | 70 62 61 62 6c 79 20 73 |.'... pr|pbably s|
|00005db0| 6f 72 74 65 64 20 74 6f | 6f 2e 0d 27 a6 05 f4 0d |orted to|o..'....|
|00005dc0| 27 b0 49 f4 20 57 68 65 | 6e 20 73 70 61 63 65 20 |'.I. Whe|n space |
|00005dd0| 69 73 20 6e 65 65 64 65 | 64 20 61 20 63 68 65 63 |is neede|d a chec|
|00005de0| 6b 20 66 75 6e 63 74 69 | 6f 6e 20 77 69 6c 6c 20 |k functi|on will |
|00005df0| 62 65 20 63 61 6c 6c 65 | 64 2e 20 20 49 74 20 77 |be calle|d. It w|
|00005e00| 69 6c 6c 20 6d 61 6b 65 | 0d 27 ba 4a f4 20 73 75 |ill make|.'.J. su|
|00005e10| 72 65 20 74 68 61 74 20 | 73 75 66 66 69 63 69 65 |re that |sufficie|
|00005e20| 6e 74 20 52 41 4d 20 65 | 78 69 73 74 73 2e 20 20 |nt RAM e|xists. |
|00005e30| 49 74 20 77 69 6c 6c 20 | 63 6c 61 69 6d 20 61 6e |It will |claim an|
|00005e40| 6f 74 68 65 72 20 70 61 | 67 65 20 69 66 20 6e 6f |other pa|ge if no|
|00005e50| 74 2e 0d 27 c4 4a f4 20 | 53 6f 20 6c 69 6d 69 74 |t..'.J. |So limit|
|00005e60| 20 70 72 6f 62 61 6c 62 | 79 20 67 72 6f 77 73 20 | probalb|y grows |
|00005e70| 69 6e 20 77 68 6f 6c 65 | 20 6e 75 6d 62 65 72 73 |in whole| numbers|
|00005e80| 20 6f 66 20 4d 45 4d 43 | 20 70 61 67 65 73 2e 20 | of MEMC| pages. |
|00005e90| 20 69 65 20 38 2f 31 36 | 2f 33 32 4b 0d 27 ce 1b | ie 8/16|/32K.'..|
|00005ea0| f4 20 64 65 70 65 6e 64 | 69 6e 67 20 6f 6e 20 6d |. depend|ing on m|
|00005eb0| 61 63 68 69 6e 65 2e 0d | 27 d8 05 f4 0d 27 e2 05 |achine..|'....'..|
|00005ec0| f4 0d 27 ec 2e f4 20 41 | 20 72 65 63 6f 72 64 20 |..'... A| record |
|00005ed0| 63 6f 6e 73 69 73 74 73 | 20 6f 66 20 74 68 65 20 |consists| of the |
|00005ee0| 66 6f 6c 6c 6f 77 69 6e | 67 20 69 74 65 6d 73 0d |followin|g items.|
|00005ef0| 27 f6 0c f4 20 4f 66 66 | 73 65 74 0d 28 00 1a f4 |'... Off|set.(...|
|00005f00| 20 20 30 30 20 2d 20 53 | 74 61 74 69 6f 6e 20 6e | 00 - S|tation n|
|00005f10| 75 6d 62 65 72 0d 28 0a | 1a f4 20 20 30 31 20 2d |umber.(.|.. 01 -|
|00005f20| 20 4e 65 74 77 6f 72 6b | 20 6e 75 6d 62 65 72 0d | Network| number.|
|00005f30| 28 14 17 f4 20 20 30 32 | 20 2d 20 4f 6e 2f 4f 66 |(... 02| - On/Of|
|00005f40| 66 20 66 6c 61 67 0d 28 | 1e 19 f4 20 20 30 33 20 |f flag.(|... 03 |
|00005f50| 2d 20 50 6f 6c 6c 70 73 | 20 72 65 73 75 6c 74 0d |- Pollps| result.|
|00005f60| 28 28 29 f4 20 20 30 34 | 20 2d 20 44 61 74 61 20 |((). 04| - Data |
|00005f70| 28 54 79 70 65 2f 76 65 | 72 73 69 6f 6e 20 66 6f |(Type/ve|rsion fo|
|00005f80| 72 6d 20 50 45 45 4b 29 | 0d 28 32 22 f4 20 20 30 |rm PEEK)|.(2". 0|
|00005f90| 38 20 2d 20 53 65 72 76 | 65 72 20 76 65 72 73 69 |8 - Serv|er versi|
|00005fa0| 6f 6e 20 24 20 32 30 2b | 43 52 0d 28 3c 10 f4 20 |on $ 20+|CR.(<.. |
|00005fb0| 20 32 39 20 2d 20 20 20 | 20 22 0d 28 46 10 f4 20 | 29 - | ".(F.. |
|00005fc0| 20 33 30 20 2d 20 20 20 | 20 22 0d 28 50 10 f4 20 | 30 - | ".(P.. |
|00005fd0| 20 33 39 20 2d 20 20 20 | 20 22 0d 28 5a 04 0d 28 | 39 - | ".(Z..(|
|00005fe0| 64 12 dd 20 f2 5f 49 6e | 69 74 4d 65 6d 6f 72 79 |d.. ._In|itMemory|
|00005ff0| 0d 28 6e 0c 4c 69 6d 69 | 74 25 3d 93 0d 28 78 0c |.(n.Limi|t%=..(x.|
|00006000| 42 61 73 65 25 20 3d 93 | 0d 28 82 21 e7 20 a4 5f |Base% =.|.(.!. ._|
|00006010| 43 68 65 63 6b 4d 65 6d | 6f 72 79 28 42 61 73 65 |CheckMem|ory(Base|
|00006020| 25 2b 31 30 32 34 29 20 | 8c 0d 28 8c 1a 20 20 f4 |%+1024) |..(.. .|
|00006030| 20 47 6f 74 20 74 68 65 | 20 65 78 74 72 61 20 70 | Got the| extra p|
|00006040| 61 67 65 0d 28 96 05 cc | 0d 28 a0 29 20 20 85 20 |age.(...|.(.) . |
|00006050| 30 2c 22 4e 6f 74 20 65 | 6e 6f 75 67 68 20 66 72 |0,"Not e|nough fr|
|00006060| 65 65 20 6d 65 6d 6f 72 | 79 20 74 6f 20 72 75 6e |ee memor|y to run|
|00006070| 22 0d 28 aa 05 cd 0d 28 | b4 05 e1 0d 28 be 04 0d |".(....(|....(...|
|00006080| 28 c8 17 dd 20 a4 5f 43 | 68 65 63 6b 4d 65 6d 6f |(... ._C|heckMemo|
|00006090| 72 79 28 4d 25 29 0d 28 | d2 14 ea 20 43 75 72 72 |ry(M%).(|... Curr|
|000060a0| 65 6e 74 25 2c 46 72 65 | 65 25 0d 28 dc 2a f4 20 |ent%,Fre|e%.(.*. |
|000060b0| 52 65 74 75 72 6e 73 20 | 54 52 55 45 20 20 69 66 |Returns |TRUE if|
|000060c0| 20 74 68 65 72 65 20 69 | 73 20 65 6e 6f 75 67 68 | there i|s enough|
|000060d0| 20 52 41 4d 0d 28 e6 41 | f4 20 52 65 74 75 72 6e | RAM.(.A|. Return|
|000060e0| 73 20 54 52 55 45 20 20 | 69 66 20 74 68 65 72 65 |s TRUE |if there|
|000060f0| 20 69 73 20 6e 6f 74 20 | 65 6e 6f 75 67 68 20 62 | is not |enough b|
|00006100| 75 74 20 69 74 20 63 61 | 6e 20 62 65 20 6f 62 74 |ut it ca|n be obt|
|00006110| 61 69 6e 65 64 0d 28 f0 | 3e f4 20 52 65 74 75 72 |ained.(.|>. Retur|
|00006120| 6e 73 20 46 41 4c 53 45 | 20 69 66 20 74 68 65 72 |ns FALSE| if ther|
|00006130| 65 20 69 73 20 6e 6f 74 | 20 65 6e 6f 75 67 68 20 |e is not| enough |
|00006140| 52 41 4d 20 69 6e 20 74 | 68 65 20 73 79 73 74 65 |RAM in t|he syste|
|00006150| 6d 20 2e 0d 28 fa 41 f4 | 20 20 20 20 20 20 20 20 |m ..(.A.| |
|00006160| 20 53 63 61 6e 6e 69 6e | 67 20 73 68 6f 75 6c 64 | Scannin|g should|
|00006170| 20 62 65 20 73 74 6f 70 | 70 65 64 20 69 66 20 74 | be stop|ped if t|
|00006180| 68 69 73 20 72 65 74 75 | 72 6e 65 73 20 66 61 6c |his retu|rnes fal|
|00006190| 73 65 21 21 0d 29 04 47 | f4 20 41 6c 77 61 79 73 |se!!.).G|. Always|
|000061a0| 20 69 6e 63 72 65 61 73 | 65 73 20 74 68 65 20 73 | increas|es the s|
|000061b0| 69 7a 65 20 62 79 20 38 | 4b 20 28 4d 61 79 20 68 |ize by 8|K (May h|
|000061c0| 6f 77 65 76 65 72 20 67 | 65 74 20 6d 6f 72 65 20 |owever g|et more |
|000061d0| 74 68 61 6e 20 74 68 61 | 74 21 29 0d 29 0e 05 f4 |than tha|t!).)...|
|000061e0| 0d 29 18 14 e7 20 4d 25 | 3c 4c 69 6d 69 74 25 20 |.)... M%|<Limit% |
|000061f0| 8c 20 3d b9 0d 29 22 2d | c8 99 22 57 69 6d 70 5f |. =..)"-|.."Wimp_|
|00006200| 53 6c 6f 74 53 69 7a 65 | 22 2c 2d 31 2c 2d 31 20 |SlotSize|",-1,-1 |
|00006210| b8 20 43 75 72 72 65 6e | 74 25 2c 2c 46 72 65 65 |. Curren|t%,,Free|
|00006220| 25 0d 29 2c 04 0d 29 36 | 15 e7 20 46 72 65 65 25 |%.),..)6|.. Free%|
|00006230| 3c 38 31 39 32 20 8c 20 | 3d 30 0d 29 40 12 46 72 |<8192 . |=0.)@.Fr|
|00006240| 65 65 25 3d 43 75 72 72 | 65 6e 74 25 0d 29 4a 31 |ee%=Curr|ent%.)J1|
|00006250| c8 99 22 57 69 6d 70 5f | 53 6c 6f 74 53 69 7a 65 |.."Wimp_|SlotSize|
|00006260| 22 2c 43 75 72 72 65 6e | 74 25 2b 38 31 39 32 2c |",Curren|t%+8192,|
|00006270| 2d 31 20 b8 20 43 75 72 | 72 65 6e 74 25 0d 29 54 |-1 . Cur|rent%.)T|
|00006280| 38 f2 44 45 42 55 47 28 | 22 52 65 73 69 7a 65 20 |8.DEBUG(|"Resize |
|00006290| 66 72 6f 6d 20 26 22 2b | c3 7e 46 72 65 65 25 2b |from &"+|.~Free%+|
|000062a0| 22 20 74 6f 20 26 22 2b | c3 7e 28 43 75 72 72 65 |" to &"+|.~(Curre|
|000062b0| 6e 74 25 29 29 0d 29 5e | 19 4c 69 6d 69 74 25 3d |nt%)).)^|.Limit%=|
|000062c0| 26 38 30 30 30 2b 43 75 | 72 72 65 6e 74 25 0d 29 |&8000+Cu|rrent%.)|
|000062d0| 68 06 3d b9 0d 29 72 04 | 0d 29 7c 4b f4 20 54 68 |h.=..)r.|.)|K. Th|
|000062e0| 65 20 62 75 67 20 61 70 | 70 65 61 72 73 20 74 6f |e bug ap|pears to|
|000062f0| 20 62 65 20 69 6e 20 74 | 68 65 20 70 6c 61 63 65 | be in t|he place|
|00006300| 6d 65 6e 74 20 6f 66 20 | 74 68 65 20 74 65 6d 70 |ment of |the temp|
|00006310| 6c 61 74 65 20 66 6f 72 | 20 74 68 65 20 77 69 6e |late for| the win|
|00006320| 64 6f 77 0d 29 86 49 f4 | 20 54 68 69 73 20 69 73 |dow.).I.| This is|
|00006330| 20 67 6f 69 6e 67 20 74 | 6f 20 68 61 76 65 20 74 | going t|o have t|
|00006340| 6f 20 62 65 20 6d 6f 76 | 65 64 20 74 6f 20 74 68 |o be mov|ed to th|
|00006350| 65 20 65 6e 64 20 6f 66 | 20 74 68 65 20 52 41 4d |e end of| the RAM|
|00006360| 20 73 6f 20 74 68 61 74 | 20 54 68 65 0d 29 90 48 | so that| The.).H|
|00006370| f4 20 69 63 6f 6e 73 20 | 63 61 6e 20 67 72 6f 77 |. icons |can grow|
|00006380| 20 61 73 20 77 65 6c 6c | 2e 20 20 54 68 69 73 20 | as well|. This |
|00006390| 6d 61 79 20 69 6e 76 6f | 6c 76 65 20 64 75 70 6c |may invo|lve dupl|
|000063a0| 69 63 61 74 69 6e 67 20 | 74 68 65 20 74 65 6d 70 |icating |the temp|
|000063b0| 6c 61 74 65 0d 29 9a 39 | f4 20 69 6e 74 6f 20 74 |late.).9|. into t|
|000063c0| 68 65 20 64 79 6e 61 6d | 69 63 20 61 72 65 61 20 |he dynam|ic area |
|000063d0| 61 6e 64 20 62 75 69 6c | 64 69 6e 67 20 69 74 20 |and buil|ding it |
|000063e0| 75 70 20 65 61 63 68 20 | 74 69 6d 65 2e 0d 29 a4 |up each |time..).|
|000063f0| 48 f4 20 54 68 65 20 77 | 69 6e 64 6f 77 20 64 65 |H. The w|indow de|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.